在R中生成对/三元组的集合

Question

我正在从矢量生成对象对，如果矢量具有奇数长度，则可能存在三元组。如何存储这些并将它们保存为成对/三元组？对是矢量。我已经尝试添加像

这样的矢量

vect <- c(vect, pair)

但它会使矢量中的所有对变平。我还尝试使用list <- list(list, pair)和list <- list(list, list(pair))以及list.append()中的rlist附加到列表，但这些似乎都没有效果。

Answer 1

您可以使用split执行此操作，您只需要为其提供一个向量，说明您希望如何拆分数组。

ARRAY = 1:13
SF = rep(1:(length(ARRAY)/2), each=2) 
if(length(SF) < length(ARRAY)) { SF = c(SF, SF[length(SF)]) }
split(ARRAY, SF)

$`1`
[1] 1 2

$`2`
[1] 3 4

$`3`
[1] 5 6

$`4`
[1] 7 8

$`5`
[1]  9 10

$`6`
[1] 11 12 13