Следующий код может находить значения до первого появления значения >=
15 в каждом столбце.
apply(m, 2, function(x) x[1:which.max(x >= 15)])
# [[1]]
# [1] 10 20
#
# [[2]]
# [1] 15
#
# [[3]]
# [1] 5 5 20
Если вы хотите, чтобы первое значение было >=
15, тогда
apply(m, 2, function(x) x[which.max(x >= 15)])
# [1] 20 15 20
Данные
m <- matrix(c(10, 20, 5, 15, 10, 10, 5, 5, 20), 3)