r - 使用 magrittr 和 which

Question

我想用 magrittr 的管道重写以下代码:

max(diff(which(diff(runif(50)) > 0 )))

我的直接方法是:

library(magrittr)
runif(50) %>% diff > 0 %>% which %>% diff %>% max

但这失败是由于(第一个):

runif(50) %>% diff > 0 %>% which

which(.) 中的错误:'which' 的参数不合逻辑

我不确定为什么会发生此错误，以及为什么管道似乎不同于管道到其他函数，因为“diff > 0”的输出是一个逻辑向量。

旁注，直白地说，有没有一种方法可以通过管道进行比较

 runif(50) %>% diff %>% > 0 

Answer 1

尝试:

runif(50) %>% diff %>% `>`(0) %>% which %>% diff %>% max

编辑:可能应该指出那些是反引号，而不是引号。