この質問の解決策を使用して：極大値と極小値を見つける極大値のデータテーブルから列番号のリストと思われるものを取得することができました。また、テーブルからそのピークの値を取得する必要があります。できれば、すでに位置を持っているので、各行に位置ではなくローカルピーク値が含まれている行列または同等のものを返します。
したがって、ベクトル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）を生成します