commit
427ebd6ac0
|
@ -42,7 +42,7 @@ partition(mtcars, 0.1)
|
||||||
We'll generate 20 random test-training splits, and then create lists of test-training datasets:
|
We'll generate 20 random test-training splits, and then create lists of test-training datasets:
|
||||||
|
|
||||||
```{r}
|
```{r}
|
||||||
partitions <- rerun(200, partition(mtcars, 0.25))
|
partitions <- rerun(20, partition(mtcars, 0.25))
|
||||||
|
|
||||||
tst <- partitions %>% map(~mtcars[.x, , drop = FALSE])
|
tst <- partitions %>% map(~mtcars[.x, , drop = FALSE])
|
||||||
trn <- partitions %>% map(~mtcars[!.x, , drop = FALSE])
|
trn <- partitions %>% map(~mtcars[!.x, , drop = FALSE])
|
||||||
|
|
Loading…
Reference in New Issue