Lifeboats                package:vcd                R Documentation

_L_i_f_e_b_o_a_t_s _o_n _t_h_e _T_i_t_a_n_i_c

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

     Data from Mersey (1912) about the 18 (out of 20) lifeboats
     launched before the sinking of the S. S. Titanic.

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

     data(Lifeboats)

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

     A data frame with 18 observations and 8 variables.

     _l_a_u_n_c_h launch time in '"POSIXt"' format.

     _s_i_d_e factor.  Side of the boat.

     _b_o_a_t factor indicating the boat.

     _c_r_e_w number of male crew members on board.

     _m_e_n number of men on board.

     _w_o_m_e_n number of women (including female crew) on board.

     _t_o_t_a_l total number of passengers.

     _c_a_p capacity of the boat.

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

     M. Friendly (2000), Visualizing Categorical Data: <URL:
     http://euclid.psych.yorku.ca/ftp/sas/vcd/catdata/lifeboat.sas>

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

     L. Mersey (1912), Report on the loss of the "Titanic" (S. S.).
     Parliamentary command paper 6452.

     M. Friendly (2000), _Visualizing Categorical Data_. SAS Institute,
     Cary, NC.

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

     data(Lifeboats)
     attach(Lifeboats)
     ternaryplot(
       Lifeboats[,4:6],
       pch = ifelse(side == "Port", 1, 19),
       col = ifelse(side == "Port", "red", "blue"),
       id  = ifelse(men / total > 0.1, as.character(boat), NA),
       prop_size = 2,
       dimnames_position = "edge",
       main = "Lifeboats on the Titanic"
     )
     grid_legend(0.8, 0.9, c(1, 19), c("red", "blue"),
       c("Port", "Starboard"), title = "SIDE")
     detach(Lifeboats)

