我有一个R via中所有可能的二进制12长度向量的列表
all_possible_permutations <- expand.grid(replicate(12, 0:1, simplify = FALSE))
我想标记两个非零单元相邻的所有向量。
举个例子
1 0 1 0 1 0 1 0 1 0 1 0 <- Not Flagged
1 1 0 1 0 1 0 1 0 1 0 1 <- Flagged (due to the first 2)
发布于 2018-08-08 06:20:08
你可以使用rle
,因为这是二进制的,即0
和1
s:
flag = function(x)any(with(rle(x),lengths[values==1]>1))
如果不是二进制的,但是你想检查两个相邻的元素是否非零,那么:
flag = function(x)any(with(rle(x>0),lengths[values]>1))
这是考虑到二进制和非二进制的广义情况
https://stackoverflow.com/questions/51736012
复制相似问题