пропущена, кстати.
your_dfr <- data.frame(year = 1:3, m1 = c(2, 3, 3), m2 = c(3, 6, 8), m3 = c(4, NA, 12))
your_dfr
your_dfr$median <- apply(your_dfr, 1, function(x) median(x[2:4], na.rm = TRUE))
your_dfr
скобку увидел. Сейчас пытаюсь разобраться. Вообще странно, я думал для таких процедур есть что-то более простое, какая-нибудь rowmedian()
Обсуждают сегодня