确定每个向量元素是否超过所有先前元素

Question

我需要将元素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)

比较结果如下：

0 1 0 1 0 1 0 1 0 0 0 0 0 0 0 1

Answer 1

以下是一种标准方式：

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

第一个元素的值是1，而不是OP的首选0，但这很容易调整。