R语言中获取向量累积最大值的最惯用方法及内置函数咨询

嘿，这确实是个很实用的问题！在R语言里，完全不用自己写for循环或者上Rcpp，有个专门的内置函数就是干这个的——cummax()！

核心用法：生成每个位置及之前的最大值向量 #

cummax()函数的作用就是对输入的数值向量计算累积最大值，直接返回一个和原向量等长的新向量，其中每个位置的元素就是原向量从开头到该位置的最大值。举个例子一看就懂：

# 示例向量
vec <- c(3, 1, 4, 1, 5, 9, 2, 6)

# 用cummax计算累积最大值
cum_max_vec <- cummax(vec)
print(cum_max_vec)
# 输出：3 3 4 4 5 9 9 9

你看，结果里每个位置的值都对应原向量到该位置为止的最大值，完全符合你的需求，而且这是R里最惯用的写法，懂R的人一看就明白你在做什么。

拓展：找某一特定位置之前的最大值 #

如果你的需求是单独找某个位置（比如第5位）之前（不含当前位置）的最大值，那也可以基于cummax来实现：

# 找第5位之前的最大值
target_pos <- 5
max_before <- cummax(vec[1:(target_pos-1)])[target_pos-1]
print(max_before)
# 输出：4

或者更简洁一点，直接取max(vec[1:(target_pos-1)])；如果是要批量对每个位置都计算“当前位置之前的最大值”（不含当前），可以稍微调整一下：

# 生成每个位置之前（不含当前）的最大值向量
max_before_vec <- cummax(c(-Inf, vec[-length(vec)]))
print(max_before_vec)
# 输出：-Inf 3 3 4 4 5 9 9

性能优势 #

cummax()是底层实现的内置函数，效率比自己写for循环高太多了，尤其是处理大向量的时候，完全不需要借助Rcpp来提速，它本身就足够快。

内容的提问来源于stack exchange，提问作者Jon Nagra