一个列表包含列名并使用该列表来引用 R 中的 tibble

Question

The table contain My Name, My Age , My Height. I would like to store in a list to get the summary of the height instead of using test = My Height

list<- c("`My Name`" , "`My Age`" , "`My Height`" )

table%>%
group_by(`My Name` ,`My Age`,`My Height` ) %>%
summarize(test = mean(list[3], na.rm = TRUE))

Answer 1

Try summarize_at :

library(dplyr)
lst<- c("`My Name`" , "`My Age`" , "`My Height`" )

table%>%
  group_by(`My Name` ,`My Age`,`My Height` ) %>%
  summarize_at(vars(lst[3]), mean, na.rm = TRUE)

Or using non-standard evaluation :

table %>%
  group_by(`My Name` ,`My Age`,`My Height` ) %>%
  summarise(test = mean(!!sym(lst[2]), na.rm = TRUE))

---

Using reproducble example form mtcars

lst <- c('cyl', 'hp', 'am')

mtcars %>%
  group_by(cyl) %>%
  summarise_at(vars(list[2]), mean, na.rm  =TRUE)

# A tibble: 3 x 2
#    cyl  test
#  <dbl> <dbl>
#1     4  82.6
#2     6 122. 
#3     8 209.