如何检查整数向量是否是"顺序"的,即后续元素之间的差异恰好是1.我觉得我错过了像"is.sequential"这样的东西
这是我自己的功能:
is.sequential <- function(x){
all(diff(x) == rep(1,length(x)-1))
}
Run Code Online (Sandbox Code Playgroud)
rep因为1将被记录,所以没有必要:
编辑允许5:2为真
is.sequential <- function(x){
all(abs(diff(x)) == 1)
}
Run Code Online (Sandbox Code Playgroud)
允许不同的序列
is.sequential <- function(x){
all(diff(x) == diff(x)[1])
}
Run Code Online (Sandbox Code Playgroud)