使用嵌套的lapply过滤条件并创建多个数据框

df1 <- data.frame(ID = c(1, 2, 3),
                  Name = c("John", "Alice", "Bob"),
                  Age = c(25, 30, 35))

df2 <- data.frame(ID = c(4, 5, 6),
                  Name = c("Tom", "Emily", "David"),
                  Age = c(40, 45, 50))

df3 <- data.frame(ID = c(7, 8, 9),
                  Name = c("Linda", "Michael", "Sarah"),
                  Age = c(55, 60, 65))

data_list <- list(df1, df2, df3)

filtered_data <- lapply(data_list, function(df) {
  subset(df, Age > 30)
})

filtered_data[[1]]  # 第一个数据框的过滤结果
filtered_data[[2]]  # 第二个数据框的过滤结果
filtered_data[[3]]  # 第三个数据框的过滤结果