使用dplyr::rename with variable

Question

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

column <- sym("string")

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

但这会输出文本列，我想将该列重命名为"string“。我尝试过使用!!，但这不起作用。

有什么建议吗？

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)