# \donttest{
data_events <- data.frame(event = c('X0Y0', 'Y0'),
strategy = c('XY', 'Y'),
count = 1:0)
CausalQueries:::drop_empty_families(data_events)
# }
Run the code above in your browser using DataLab