correct53to52          package:surveillance          R Documentation

_D_a_t_a _C_o_r_r_e_c_t_i_o_n _f_r_o_m _5_3 _t_o _5_2 _w_e_e_k_s

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

     Correction of data from 53 to 52 weeks a year

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

         correct53to52(disProgObj, firstweek = 1)

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

disProgObj: object of class disProg (including the observed and the
          state chain).

firstweek: the number of the first week in a year, default = 1 (if it
          starts with the beginning of a year). Necessary, because the
          infected of week 53 and the infected of week 52 must be
          added.

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

     'readData' reads data with 53 weeks a year, but normally one year
     is said to have 52 weeks.

_V_a_l_u_e:

 disProg: a object 'disProg' (disease progress) including a list of the
          observed and the state chain (corrected to 52 weeks instead
          of 53 weeks a year)

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

     'readData'

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

         #This call correct53to52 automatically
         obj <- readData("k1",week53to52=TRUE)
         correct53to52(obj) # first entry is the first week of the year

         obj <- readData("n1",week53to52=FALSE)
         correct53to52(obj, firstweek = 5) # now it's assumed that the fifth
                                           # entry is the first week of the year

