Calculate an OxCGRT index or indices
calculate_index(df, codes, tolerance)
calculate_gov_response(df)
calculate_containment_health(df)
calculate_stringency(df)
calculate_economic_support(df)
calculate_indices(df)A data.frame produced by a call to calculate_subindices().
A vector of policy type codes to use for the index calculation.
An integer specifying the number of missing values above which index will not be calculated and reported.
A numeric value for mean subindex scores of specified policy types.
For calculate_indices(), a tibble calculated OxCGRT indices
## Get policy actions data for Afghanistan on 1 September 2020
x <- get_data(json = get_json_actions(ccode = "AFG",
from = NULL,
to = "2020-09-01"))
## Calculate OxCGRT subindices
y <- calculate_subindices(df = x$policyActions)
## Calculate OxCGRT index
calculate_index(df = y,
codes = c(paste("C", 1:8, sep = ""),
paste("E", 1:2, sep = ""),
paste("H", 1:3, sep = ""), "H6"),
tolerance = 1)
#> [1] 33.33333
## Calculate OxCGRT government response index
calculate_gov_response(df = y)
#> [1] 33.33333
## Calculate OxCGRT containment and health index
calculate_containment_health(df = y)
#> [1] 38.88889
## Calculate OxCGRT stringency index
calculate_stringency(df = y)
#> [1] 21.2963
## Calculate OxCGRT economic support index
calculate_economic_support(df = y)
#> [1] 0
## Calculate all OxCGRT indices
calculate_indices(df = y)
#> # A tibble: 4 × 2
#> index values
#> <chr> <dbl>
#> 1 Government Response Index 33.3
#> 2 Containment and Health Index 38.9
#> 3 Stringency Index 21.3
#> 4 Economic Support Index 0