

VADeaths {base}                              R Documentation

_D_e_a_t_h _R_a_t_e _D_a_t_a

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

     Death rates per 100 in Virginia in 1940.

_U_s_a_g_e_:

     data(VADeaths)

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

     A matrix with 5 rows and 5 columns.

_D_e_t_a_i_l_s_:

     The death rates are cross-classified by age group
     (rows) and population group (columns).  The age groups
     are: 50-54, 55-59, 60-64, 65-69, 70-74 and the popula-
     tion groups are Rural/Male, Rural/Female, Urban/Male
     and Urban/Female.

     This provides a rather nice 3-way analysis of variance
     example.

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

     L. Moyneau, S. K. Gilliam, and L. C. Florant (1947).
     Differences in Virginia death rates by color, sex, age,
     and rural or urban residence.  American Sociological
     Review, 12, 525-535.

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

     McNeil, D. R. (1977).  Interactive Data Analysis.
     Wiley.

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

     data(VADeaths)
     n <- length(dr <- c(VADeaths))
     nam <- names(VADeaths)
     d.VAD <- data.frame(
      Drate = dr,
      age = rep(ordered(rownames(VADeaths)),length=n),
      gender= gl(2,5,n, labels= c("M", "F")),
      site =  gl(2,10,  labels= c("rural", "urban")))
     coplot(Drate ~ as.numeric(age) | gender * site, data = d.VAD,
            panel = panel.smooth, xlab = "VADeaths data - Given: gender")
     summary(aov.VAD <- aov(Drate ~ .^2, data = d.VAD))
     opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1, 0))
     plot(aov.VAD)
     par(opar)

