From a89f88499f339556509bc7de6a7a472a4ff4861d Mon Sep 17 00:00:00 2001 From: timelyportfolio Date: Sun, 24 May 2020 08:02:11 -0500 Subject: [PATCH] replace deprecated `tidyr::nest_` #17 --- R/party.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/party.R b/R/party.R index ac5f47f..2091542 100644 --- a/R/party.R +++ b/R/party.R @@ -96,7 +96,7 @@ d3_party = function (tree=NULL, json=TRUE) { ) colnames(counts) <- c("fitted", "response", "freq") counts$fitted = as.numeric(as.character(counts$fitted)) - counts <- tidyr::nest_(counts, nest_cols=c("response", "freq"), key_col="size") + counts <- tidyr::nest(counts, data=c(response, freq)) # would use dplyr join here, but nested data.frame # flattened on join; this does not happen with nested # tibble, but don't want to add another depedency