选择一对具有1个固定列的列，而其他列是任何其他列

Question

我有一个包含5列的数据集。我想选择4对数据并将其存储在4个名称下。但是我想对所有这些对取第一列，而对中的另一列将是其他4列中的任何一列。

Target  Var1    Var2    Var3    Var4
1       1167    56130   0.591   0.248
0       1677    47681   0.425   0.875
1       603     22006   0.462   1.401
1       489     68545   0.348   0.869
0       1479    38670   0.919   1.678
1       976     15307   0.268   1.056
1       1509    53761   0.81    1.76
1       1093    54701   0.875   1.03
0       648     68620   0.728   1.013
1       1501    58637   0.428   0.651
0       308     54036   0.814   1.084
1       1609    86235   0.136   1.29
1       817     29216   0.422   0.177
1       460     70500   0.912   1.654
1       1190    89207   0.397   0.191
1       1128    40301   0.771   1.08

Answer 1

一种简单的方法，使用df您的data.frame：

dataset.list <- lapply(df[,2:dim(df)[2]],
                       function(col){
                         cbind(df[[1]], col)
                       })

dataset.list包含4个data.frame，每个数据帧由两列构成：每个data.frame的第一列是第一列，另一列是V1，V2，...，Vn，其中n = ncol- 1。