R：当列数为质数时拆分数据框
R: Split data frame when number of columns is a prime
我有一个有 131 列的 data.frame。我需要将其分成大约 10 到 15 个变量的组（即按列拆分，而不是按行！）。显然，由于131是质数，并不是所有的新数据帧都可以等长...
我在帖子里搜索了答案
- How to cut data in even pieces in R?
- Split a vector into chunks in R
- Splitting a large vector into intervals in R
但他们似乎都假设新数据帧的大小相同。
编辑
感谢下面的评论，我会尽力澄清：
我的数据框是这样的
head(trainData)
ID drop_vce_Range drop_dat_Range blck_vce_Range blck_dat_Range
48550 high low high low
30965 low low high high
40501 low low med low
41771 med low low low
42138 med low low low
42975 high low low low
这个数据框有 131 列。我想在我的 globalenv 中有几个数据框，例如名称为 "Training_Part_1"、"Training_Part_2" 等的实例。这些新 data.frames 中的每一个都应该由旧 data.frame.
的大约 15 列组成
这将创建一个数据框列表，该列表通过将内置数据框 anscombe 的 8 列切割成 3 个不相等的集合而形成：
k <- 3
nc <- ncol(anscombe)
lapply(split(as.list(anscombe), cut(1:nc, k, labels = FALSE)), as.data.frame)
我有一个有 131 列的 data.frame。我需要将其分成大约 10 到 15 个变量的组（即按列拆分，而不是按行！）。显然，由于131是质数，并不是所有的新数据帧都可以等长...
我在帖子里搜索了答案
- How to cut data in even pieces in R?
- Split a vector into chunks in R
- Splitting a large vector into intervals in R
但他们似乎都假设新数据帧的大小相同。
编辑 感谢下面的评论，我会尽力澄清：
我的数据框是这样的
head(trainData)
ID drop_vce_Range drop_dat_Range blck_vce_Range blck_dat_Range
48550 high low high low
30965 low low high high
40501 low low med low
41771 med low low low
42138 med low low low
42975 high low low low
这个数据框有 131 列。我想在我的 globalenv 中有几个数据框，例如名称为 "Training_Part_1"、"Training_Part_2" 等的实例。这些新 data.frames 中的每一个都应该由旧 data.frame.
这将创建一个数据框列表，该列表通过将内置数据框 anscombe 的 8 列切割成 3 个不相等的集合而形成：
k <- 3
nc <- ncol(anscombe)
lapply(split(as.list(anscombe), cut(1:nc, k, labels = FALSE)), as.data.frame)