correct53to52: Data Correction from 53 to 52 weeks

In jimhester/surveillance: Temporal and Spatio-Temporal Modeling and Monitoring of Epidemic Phenomena

Description

Correction of data from 53 to 52 weeks a year

Usage

    correct53to52(disProgObj, firstweek = 1)

Arguments

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.

Details

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

Value

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)

See Also

readData

Examples

    #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

jimhester/surveillance documentation built on May 19, 2019, 10:33 a.m.