# NOT RUN {
df_treatments <- data.frame(c(0, 2, 0, 1, 1, 0, 2, 1, 1, 0),
c(0, 2, 0, 1, 2, 0, 1, 2, 1, 0),
c(0, 2, 1, 1, 2, 0, 0, 2, 0, 0))
colnames(df_treatments) <- c("treatment_iter_1", "treatment_iter_2", "treatment_iter_3")
count_occurrences(df_treatments,
c(0, 2, 1, 1, 2, 0, 0, 2, 0, 0))
# }
Run the code above in your browser using DataLab