将 dplyr::rename 与变量一起使用

Question

我有一个变量column，我想用它来重命名表中的列：

column <- sym("string")

tibble(
  a = 1
) %>%
  rename(column = 1)

但这会输出文字列，我想将列重命名为“字符串”。我试过使用!!，但这不起作用。

有什么建议吗？

Answer 1

这里不需要符号。即使字符串也应该工作

library(dplyr)
tibble(a =1) %>% 
   rename(!! column := 1)
# A tibble: 1 x 1
#  string
#   <dbl>
#1      1

或rename_at

tibble(a = 1) %>%
  rename_at(1,  ~ as.character(column))
# A tibble: 1 x 1
#  string
#   <dbl>
#1      1

或者tibble可以直接命名

tibble(!! column := 1)