nlreg (version 1.2-2.2)

helicopter: Helicopter Data

Description

The helicopter data frame has 9 rows and 6 columns.

Experimental design for studying the influences of the factors wing length and wing width on a paper helicopter's flight time. The goal is to find the factor setting that maximizes flight time when the paper helicopter is dropped from a fixed height of 15.5 feet

Usage

data(helicopter)

Format

A data frame with 9 observations on the following 6 variables:

L

wing length in inches;

W

wing width in inches;

B

base length (always set to 3in);

H

base height (always set to 2in);

Order

run order;

Time

flight time in seconds.

References

Box, G. E. P. (1992) Teaching engineers experimental design with a paper helicopter. Quality Engineering, 4, 453--459.

Examples

# NOT RUN {
data(helicopter)
##
## fit model (5) of Annis (2005)
## -----------------------------
heli <- helicopter
##
heli$LW <- heli$L * heli$W
heli$S <- heli$B * heli$H + ( 2 * heli$L + 1 ) * heli$W
heli$logTime <- log( heli$Time )
heli$Y <- heli$logTime + log( heli$S ) / 2
#
heli.nlreg <- nlreg( Y ~ b0 + b1 * log( b2^2 / LW + LW ), data = heli, 
                    start = c( b0 = 6, b1 = -1, b2 = 20 ) )
# }