如何解决read_excel 然后将列名解析为函数
我有以下 excel 数据集 sample1.xlsx 并希望计算每个组的平均值:
name,value1,value2
C1 5 0.5
C1 6 0.4
C1 7 0.8
T1 10 2.2
T1 20 4.6
T1 30 2.9
T2 100 10.1
T2 200 30.5
T2 300 20.5
library(tidyverse)
library(readxl)
xfile <- read_excel("sample1.xlsx")
xfile %>%
group_by(name) %>%
summarize(mean(value1))
# This works
然而,当把它变成一个函数时(这样也可以计算 value2 的平均值):
mean_byname <- function(colname){
xfile %>%
group_by(name) %>%
summarize(mean(colname))
}
mean_byname(value2)
# returns error msg Error: Problem with `summarise()` input `..1`.
- 你能解决这个错误吗?
- 如果我想获得一个在“name”中包含唯一值的向量,即在本例中为 C1 T1 T2,是否有比这更简单的替代方法?:
xname <- xfile %>%
group_by(name) %>%
summarize(mean(value1))
xname$name
非常感谢。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。