выберите dataframes из списка на основе максимального значения столбца

Question

У меня есть список x2, имеющий два кадра данных, x и x1. Оба имеют 4 столбца: n, m, l и k. Я хочу выбрать кадр данных с максимальным последним значением для столбца k.

В приведенном ниже примере, Я хотел бы второй кадр данных, которые будут выбран, так как последнее значение в столбце K больше, чем последнее значение в столбце K для фрейма данных 1.

x <- data.frame(n = c(2, 13, 5),m = c(2, 23, 6),l = c(2, 33, 7),k = c(2, 43, 8)) 
x1 <- data.frame((n = c(2, 3, 15),m = c(2, 3, 16),l = c(2, 3, 17),k = c(2, 3, 18)) 
x2<-list(x,x1) 

Answer 1

Использование lapply, зацикливание по списку x2 и получите последнее значение столбца k этого фрейма данных. Использование which.max, найти индекс, который имеет максимум предыдущей lapply команды и извлечь что dataframe из x2

Примечания: Этот код не учитывает связи в последнем значении к колонку.

x2[which.max(lapply(x2, function(x) tail(x$k, 1)))] 

# [[1]] 
# n m l k 
# 1 2 2 2 2 
# 2 3 3 3 3 
# 3 15 16 17 18 

Answer 2

if(x$k[length(x$k)] >= x1$k[length(x1$k)]) x else x1 

Условных заявление, где x$k[length(x$k)] - получает последний элемент из столбца к матрицы х

n m l k 
1 2 2 2 2 
2 3 3 3 3 
3 15 16 17 18