drawIncidenceFin {RcmdrPlugin.RiskDemo}

Plotting incidence curves of an epidemic with Finnish data

Description

This function plots incidence curves of an epidemic for selected regions of Finland. The incidences are new cases per 100 000 inhabitants within one or two weeks.

Usage

drawIncidenceFin(data, pop, regions, start = "2020-06-01", end = "last", weeks = 2, 
    includeAllRegions = TRUE, log = TRUE)

Arguments

data

data frame including columns Aika (character string indicating the date), Alue (character string indicating the region) and val (numeric indicating the number of new cases)

pop

data frame including columns Alue (character string indicating the region) and val (integer indicating the population)

regions

vector of characters srings indicating the regions for which the curves are plotted

start

beginning date of the time window for which the curve is plotted

end

ending date of the time window for which the curve is plotted

weeks

Integer telling how many weeks' observations are used to calculate the incidence. Usually 1 or 2.

includeAllRegions

logical indicating if a curve for total incidence is included

log

logical indicating if a log scale is used in the plot

Value

No value

Author(s)

Arto Luoma <[e-mail]>

See Also

drawIncidence, dataCovidFin

Examples

data(dataCovidFin)
data(popRegionsFin)
drawIncidenceFin(data = dataCovidFin, pop = popRegionsFin, 
    regions = popRegionsFin$Alue[1:5], start = "2020-06-01", end="last", weeks=2, 
    includeAllRegions = TRUE)