library(dplyr)
library(omopgenerics)
x <- tibble(
"result_id" = 1L,
"cdm_name" = "eunomia",
"group_name" = "cohort_name",
"group_level" = c("cohort1", "cohort2", "cohort3"),
"strata_name" = "sex",
"strata_level" = "Female",
"variable_name" = "number subjects",
"variable_level" = NA_character_,
"estimate_name" = "count",
"estimate_type" = "integer",
"estimate_value" = c("100", "44", "14"),
"additional_name" = c("year", "time_step", "year &&& time_step"),
"additional_level" = c("2010", "4", "2015 &&& 5")
) |>
newSummarisedResult()
x |>
filterAdditional(year == "2010")
Run the code above in your browser using DataLab