library(omock)
library(dplyr)
# Create a mock CDM reference and add observation periods
cdm <- mockCdmReference() |>
mockPerson(nPerson = 100) |>
mockObservationPeriod()
# View the generated observation period data
cdm$observation_period |>
glimpse()
Run the code above in your browser using DataLab