diff --git a/NEWS.md b/NEWS.md index c282315..586d330 100644 --- a/NEWS.md +++ b/NEWS.md @@ -2,7 +2,7 @@ Version 1.1.8.9000 ========================= -* placeholder for next development-cycle +* address deprecated .dots argument of group_by() due to upcoming dplyr version 1.2.0 Version 1.1.8 ========================= diff --git a/R/define_simulation.R b/R/define_simulation.R index 70bac63..3ed53e7 100644 --- a/R/define_simulation.R +++ b/R/define_simulation.R @@ -40,10 +40,9 @@ define_simulation <- function(pf, discard_generated_data, cluster, ) res <- purrr::map(res, ~ do.call("bind_or_combine", .)) if (!is.null(summary_fun) && !is.null(group_for_summary)) { - class(group_for_summary) <- "list" res <- lapply(summary_fun, function(f) { purrr::map(res, ~ dplyr::summarize_all( - dplyr::group_by(., .dots = group_for_summary), f + dplyr::group_by(., dplyr::pick(dplyr::all_of(group_for_summary))), f )) }) } else {