Skip to content

Commit 4639983

Browse files
committed
hard-code rlang::%||%
seeing some sort of strange division behavior for `prop` in tune
1 parent 2000f2d commit 4639983

File tree

1 file changed

+4
-2
lines changed

1 file changed

+4
-2
lines changed

R/fit.R

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -66,16 +66,18 @@ fit.workflow <- function(object, data, ..., control = control_workflow()) {
6666
if (should_inner_split(object)) {
6767
validate_rsample_available()
6868

69+
method <- object$post$actions$tailor$method
6970
mocked_split <-
7071
rsample::make_splits(
7172
list(analysis = seq_len(nrow(data)), assessment = integer()),
7273
data = data,
73-
class = object$post$actions$tailor$method %||% "mc_split"
74+
class = if (is.null(method)) "mc_split" else method
7475
)
7576

77+
prop <- object$post$actions$tailor$prop
7678
inner_split <- rsample::inner_split(
7779
mocked_split,
78-
list(prop = object$post$actions$tailor$prop %||% 2/3)
80+
list(prop = if (is.null(prop)) 2/3 else prop)
7981
)
8082

8183
data <- rsample::analysis(inner_split)

0 commit comments

Comments
 (0)