# \donttest{
library(OmopSketch)
library(CDMConnector)
library(duckdb)
requireEunomia()
con <- dbConnect(duckdb(), eunomiaDir())
cdm <- cdmFromCon(con = con, cdmSchema = "main", writeSchema = "main")
summariseConceptIdCounts(cdm = cdm, omopTableName = "condition_occurrence",
countBy = c("record", "person"), sex = TRUE)
# }
Run the code above in your browser using DataLab