Skip to content

Commit 07525af

Browse files
authored
bump minimum dplyr version (#939)
1 parent 1025893 commit 07525af

File tree

2 files changed

+3
-11
lines changed

2 files changed

+3
-11
lines changed

DESCRIPTION

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,7 @@ Depends:
2020
R (>= 3.5)
2121
Imports:
2222
cli,
23-
dplyr (>= 0.8.0.1),
23+
dplyr (>= 1.1.0),
2424
generics (>= 0.1.2),
2525
ggplot2,
2626
globals,

R/glmnet-engines.R

Lines changed: 2 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -254,11 +254,7 @@ format_glmnet_multi_linear_reg <- function(pred, penalty) {
254254
pred$.row <- seq_len(nrow(pred))
255255
pred <- tidyr::pivot_longer(pred, -.row, names_to = "s", values_to = ".pred")
256256

257-
if (utils::packageVersion("dplyr") >= "1.0.99.9000") {
258-
pred <- dplyr::full_join(penalty_key, pred, by = "s", multiple = "all")
259-
} else {
260-
pred <- dplyr::full_join(penalty_key, pred, by = "s")
261-
}
257+
pred <- dplyr::full_join(penalty_key, pred, by = "s", multiple = "all")
262258

263259
pred <- pred %>%
264260
dplyr::select(-s) %>%
@@ -290,11 +286,7 @@ format_glmnet_multi_logistic_reg <- function(pred, penalty, type, lvl) {
290286
dplyr::select(c(".row", "s", paste0(".pred_", lvl)))
291287
}
292288

293-
if (utils::packageVersion("dplyr") >= "1.0.99.9000") {
294-
pred <- dplyr::full_join(penalty_key, pred, by = "s", multiple = "all")
295-
} else {
296-
pred <- dplyr::full_join(penalty_key, pred, by = "s")
297-
}
289+
pred <- dplyr::full_join(penalty_key, pred, by = "s", multiple = "all")
298290

299291
pred <- pred %>%
300292
dplyr::select(-s) %>%

0 commit comments

Comments
 (0)