返回使用.max的位置向量

Question

  x <- seq(1:100)
  y <- 30

如果我想确定x> y的累积和的位置

  which.max(cumsum(x) >= y)
  [1] 9 # 

相反,如果y是一个向量,即我想为y的每个元素返回x的位置

  y <- c(30, 60, 80, 90)
  which.max(cumsum(x) >= y)
  [1] 9

为什么不重新调整位置向量？

Answer 1

另一个量化想法是使用max.col带outer,即

max.col(t(outer(cumsum(x), y, `>`)), 'first')
#[1]  8 11 13 13