如何找到r中所有数值列的平均值，以及一个非数值列？

我有从csv导出的R格式的数据。第一列包含日期，其他20列包含20个不同国家的汇率。如何计算每个国家的平均汇率？我对数据使用了

sapply

，但这不起作用，因为第一列日期不是数字

---

然后，我尝试使用

ExRate$date删除日期列，我认为您可以从第一个日期列中删除子集：

ex_means <- sapply(ExRate[, 2:21], mean)

ex_means <- sapply(ExRate[, -which(names(ExRate) == "date")])

ex_意思是如果

library(dplyr)
ExRate %>%
       summarise_if(is.numeric, mean)


作为一个可复制的例子

data(iris)
iris %>%
    summarise_if(is.numeric, mean)
#    Sepal.Length Sepal.Width Petal.Length Petal.Width
#1     5.843333    3.057333        3.758    1.199333

sapply（ExRate[，-1]，mean）
在第一个实例中可能会更简单