E2grades              package:ProfessR              R Documentation

_E_x_a_m_i_n_a_t_i_o_n _g_r_a_d_e_s _f_r_o_m _T_e_s_t _2 _i_n _2_0_0_7

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

     Real exam raw scores from test in Geology 105, University of North
     Carolina.  Zeros are assigned to students who did not take the
     test.

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

     data(E2grades)

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

     numeric vector

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

     data(E2grades)

     g = E2grades

     B = boxplot(g[g>1], plot=FALSE)
     divs = c(min(g), B$stats[1:4] + diff(B$stats)/2, max(g) )
      get(getOption("device"))(width = 12, height = 7)

     D1 = do.grades(g, divs=divs, cut = 15, tit="GEOL 105 Exam 1")

     jist(D1$hist, D1$grades, D1$lett, col='purple')

