如何合并向量列表(以R表示)，使它们具有最小长度？
如何合并向量列表(以R表示)，使它们具有最小长度？
提问于 2017-08-29 18:08:46
我有以下四个向量：
A <- c(5, 5, 5, 5, 5, 5, 5)
B <- c(6, 6, 6)
C <- c(7, 7, 7, 7)
D <- c(8, 8, 8, 8)最后，我想把这个向量列表(这里有4个向量)转换为，所有的完全向量(即不分裂单个向量)的成对组合，而级联向量的最小长度为7。因此，一个可能的解决办法是：
s1 <- c(5, 5, 5, 5, 5, 5, 5, 6, 6, 6)
s2 <- c(7, 7, 7, 7, 8, 8, 8, 8)我该怎么做？
回答 1
Stack Overflow用户
回答已采纳
发布于 2017-08-29 19:26:03
我使用combn对单个向量进行成对组合(忽略方向c(A,B) == c(B,A)和自级联，c(A,A)是不需要的)
temp <- combn(list(A,B,C,D), 2)
threshold <- 7
L1 <- lapply(1:ncol(temp), function(x) Reduce("c", c(temp[1,x], temp[2,x])))丢弃长度小于7的级联向量。我使用lengths (不同于length)获取列表中所有向量的长度。
L2 <- L1[lengths(L1) >= threshold]输出
[[1]]
[1] 5 5 5 5 5 5 5 6 6 6
[[2]]
[1] 5 5 5 5 5 5 5 7 7 7 7
[[3]]
[1] 5 5 5 5 5 5 5 8 8 8 8
[[4]]
[1] 6 6 6 7 7 7 7
[[5]]
[1] 6 6 6 8 8 8 8
[[6]]
[1] 7 7 7 7 8 8 8 8页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/45945734
复制相关文章
相似问题
腾讯云开发者
