r：通過函數運行所有數據框以獲取最小和最大日期

Question

我有兩個數據df1和df2 ，每個數據df1都有一個不同的Date列（名稱相同且大小寫相同）。

我創建了一個函數來告訴我最小和最大日期，當我通過它運行每個數據框時：

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 s，而不是一個list的data.frame ，例如

c(mtcars, iris)

和

list(mtcars, iris)

數據

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