r: запуск всех фреймов данных через функцию для получения минимальной и максимальной даты

Question

У меня есть два кадра данных, df1 & df2, каждый из которых имеет отдельный столбец Date (названный одинаково с тем же регистром).

Я создал функцию, чтобы сообщить мне min и max даты, когда я запускаю каждый фрейм данных через него:

dMMfunc<- function(df){
  maxDate<- max(df[['Date']])
  minDate<- min(df[['Date']])
  return(c(maxDate, minDate))
}

> dMMfunc(df1)
[1] "2017-11-26" "2017-11-20"

Затем я создал список фреймов данных для прохождения через мою функцию, получая чтение намин и макс каждого, но это выдает и ошибка, см. ниже:

dfList<- c(df1, df2)
> lapply(dfList, dMMfunc)
Error in df[["Date"]] : subscript out of bounds

Как мне заставить мою функцию возвращать мин и макс Dateкаждого кадра данных?

Answer 1

Нам нужно list вместо c

dfList <- list(df1, df2)

Разница в том, что c объединяет столбцы второго набора данных с первым и возвращает list из vector с.вместо list из data.frame, например

c(mtcars, iris)

и

list(mtcars, iris)

data

df1 <- data.frame(Date = Sys.Date() + 1:5)
df2 <- data.frame(Date = Sys.Date() - 1:5)