如何在R中划分組

Question

如果我有這樣的系列：

s={9, 4, 6, 5, 3, 10, 5, 3, 5)}   

我想將組除以數字5

最后，它必須是

s1={9, 4, 6, 5}    
s2={5, 3, 10, 5}    
s3={5, 3, 5}

我已經嘗試過

cut(ss,ss==5)    

我應該做些什么？

我可以使用什么功能？

Answer 1

這是一種生成包含三個向量的列表的方法：

# the original vector
s <- c(9, 4, 6, 5, 3, 10, 5, 3, 5) 

# an index vector
idx <- unique(c(1, which(s == 5), length(s)))

# create a list
mylist <- lapply(seq(length(idx) - 1), function(i) s[idx[i]:idx[i+1]])

mylist
# [[1]]
# [1] 9 4 6 5

# [[2]]
# [1]  5  3 10  5

# [[3]]
# [1] 5 3 5

您可以使用[[例如mylist[[1]]作為第一個向量來訪問列表元素。