R 确定每个向量元素是否超过所有之前的元素

我需要将元素

I

与之前的所有元素

I-1、I-2、…

进行比较，如果

I>I-1、I-2、…

返回1，否则返回0

data <- c(10.3,14.3,7.7,15.8,14.4,16.7,15.3,20.2,17.1,7.7,15.3,16.3,19.9,14.4,18.7,20.7)

---

这里有一个标准方法：

as.integer(cummax(data) == data)

---

这里，第一个元素的值是

1

，而不是OP首选的

0

，但这很容易调整。

除了第一项之外，这是

as.integer（cummax（data）=data）

。。。认为有一个重复。@akrun根据OP的描述（

v[i]>v[i-1]，v[i-2]，…

），我猜第一个值是任意的或是约定的，因为

i=1

的条件是未定义的。因为我找不到重复，所以发布。

as.integer(cummax(data) == data)