split一课里按照老师方法输入的内容显示错误

lapply(s,function(x) colMeans(x[,c("Ozone","Wind","Temp")

运行后输出

类别为“Symbol"的对象不可取子集

是为什么？