trees                package:datasets                R Documentation

_G_i_r_t_h, _H_e_i_g_h_t _a_n_d _V_o_l_u_m_e _f_o_r _B_l_a_c_k _C_h_e_r_r_y _T_r_e_e_s

_D_e_s_c_r_i_p_t_i_o_n:

     This data set provides measurements of the girth, height and
     volume of timber in 31 felled black cherry trees.  Note that girth
     is the diameter of the tree (in inches) measured at 4 ft 6 in
     above the ground.

_U_s_a_g_e:

     trees

_F_o_r_m_a_t:

     A data frame with 31 observations on 3 variables.

       '[,1]'  'Girth'   numeric  Tree diameter in inches
       '[,2]'  'Height'  numeric  Height in ft
       '[,3]'  'Volume'  numeric  Volume of timber in cubic ft

_S_o_u_r_c_e:

     Ryan, T. A., Joiner, B. L. and Ryan, B. F. (1976) _The Minitab
     Student Handbook_. Duxbury Press.

_R_e_f_e_r_e_n_c_e_s:

     Atkinson, A. C. (1985) _Plots, Transformations and Regression_.
     Oxford University Press.

_E_x_a_m_p_l_e_s:

     require(stats); require(graphics)
     pairs(trees, panel = panel.smooth, main = "trees data")
     plot(Volume ~ Girth, data = trees, log = "xy")
     coplot(log(Volume) ~ log(Girth) | Height, data = trees,
            panel = panel.smooth)
     summary(fm1 <- lm(log(Volume) ~ log(Girth), data = trees))
     summary(fm2 <- update(fm1, ~ . + log(Height), data = trees))
     step(fm2)
     ## i.e., Volume ~= c * Height * Girth^2  seems reasonable

