# NOT RUN {
iris_sub <- dplyr::filter(iris, Species != "virginica")
iris_summary <- dplyr::group_by(iris_sub, Species)
iris_summary <- dplyr::summarise(iris_summary, N = dplyr::n())
iris_summary <- dplyr::ungroup(iris_summary)
add_missing(iris_summary, "Species", list(N = 0))
# }
Run the code above in your browser using DataLab