Enrollment and Follow-Up Monitoring Plots

r

site_cumulative_enrollment |>
  ggplot(aes(x = enrollment_date, y = cumulative_participants)) +
  geom_line() +
  facet_wrap(~ site) +
  labs(
    title = "Cumulative Enrollment by Site",
    x = "Enrollment date",
    y = "Cumulative participants"
  )