使用这个问题的解决方案：寻找局部最大值和最小值我已经能够从我的数据表中检索似乎是列号列表的局部最大值。我还需要从表中检索该峰值的值。最好我会返回一个矩阵或等价物，其中每行包含局部峰值而不是位置，因为我已经有了位置
所以说使用向量 ex_data <-c(1,3,2,2,1,3,5,4,2,1) 我想得到一个向量说 (3,5)。我已经有下面的代码：
local_max <- function(x) {
which(diff(sign(diff(x)))==-2)+1}
local_max(ex_data)
产生向量 (2,7)