如何在 r 中查看经过交叉验证的重采样数据?

How to view cross validated resample data in r?

我是 tidymodels 的新手,也是 R 的新手。

我使用 tidymodels 创建了一个 食谱 ,它在 训练数据 上运行良好,但给出了 交叉验证重采样.

错误

所以我想查看重采样,但它们不是简单的 df 格式。

train_5fold

############ result ###########

splits              id
<list>              <chr>

<S3: vfold_split>   Fold1           
<S3: vfold_split>   Fold2           
<S3: vfold_split>   Fold3           
<S3: vfold_split>   Fold4           
<S3: vfold_split>   Fold5

下载资料

https://github.com/johnsnow09/covid19-df_stack-code/blob/main/train_5fold.RDS

train_5fold <- readRDS("train_5fold.RDS")

如何查看它们??

我尝试了pluck()、unnest_wider、unlist等,但无法获得真正的数据框。

我还在 tidymodels 上 post 编辑了另一个 SO post 直到现在仍然没有答案所以尝试通过交叉检查 CV 数据

进行调试

Getting error when trying to apply tidymodels recipe from train data to resamples in r?

您可以从每个 splits 中获取数据 lapply 作为 -

df <- readRDS('train_5fold.RDS')
list_df <- lapply(df$splits, `[[`, 'data')

如果你想将它们组合在一个数据框中,使用 res <- do.call(rbind, list_df) 或者 purrr -

library(purrr)
res <- map_df(df$splits, pluck, 'data')