birthday              package:labstatR              R Documentation

_C_a_l_c_o_l_a _l_a _p_r_o_b_a_b_i_l_i_t_a' _d_i _c_o_m_p_l_e_a_n_n_i _c_o_i_n_c_i_d_e_n_t_i

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

     Questa funzione risolve il problema del calcolo della probabilita'
     di trovare due persone in un gruppo di 'n' nate lo stesso giorno.

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

     birthday(n)

_A_r_g_u_m_e_n_t_s:

       n: numero di persone nel gruppo

_S_e_e _A_l_s_o:

     'pbirthday'.

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

     n <- c(5,10,15,20,21,22,23,24,25,30,50,60,
            70,80,90,100,200,300,365)
     for(i in n)
      cat("\n n=",i,"P(A)=",birthday(i))

