我有一个这样的字符向量:
a<-c("tanaman","cabai","banget","hama","sakit","tanaman","koramil","nogosari",
"melaks","ecek","hama","tanaman","padi","ppl","ds","rambun")
我想根据如下列表的长度将字符向量拆分为列表:
split.char<-list(c("tanaman", "cabai"),c("banget", "hama",
"penyakit", "tanaman"),c("koramil", "nogosari", "melaks", "pengecekan", "hama",
"tanaman" , "padi", "ppl", "ds", "rambun"))
我试图sapply(split.char, length)
用来定义列表的长度split.char
Length <- sapply(split.char, length)
for(i in Length){
split(a, Length(i))
}
但是我没有得到想要的输出,并且不断收到以下警告消息:
1: In split.default(ok, Length) : data length is not a multiple of split variable
2: In split.default(ok, Length) : data length is not a multiple of split variable
3: In split.default(ok, Length) : data length is not a multiple of split variable
您可以尝试以下方法:
split(x=a, f=rep(seq_along(Length), Length))
f
长度必须与长度相同x
(如果长度为1或分配器的长度x
可以循环使用)。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句