如何使用字符对象将r在r中重命名列？

Question

我的数据框架就是这样：

#generic dataset
datatest <- data.frame(col1 = c(1,2,3,4), col2 = c('A', 'B', 'C', 'D'))

#character objects
name1 <- 'A'
name2 <- 'B'

我想使用name1和name2对象重命名列。这些动态更改代码，因此我无法使用以下内容：

#I DON'T WANT THIS
datatest %>% rename(A = col1, B = col2)

我想使用以下内容：

datatest %>% rename(name1 = col1, name2 = col2)

但是，数据表列最终分别成为'name1'和'name2'，当它们应为a和B时。这是目前的数据表。

name1（我希望这是a）	name2（我希望这是b）
1	A
2	B
3	C
4	D

任何帮助都非常感谢。我也在Kable桌子上也有同样的问题。 提前致谢！

Answer 1

几个选项 -

1. 使用rename_with -

library(dplyr)

name1 <- 'A'
name2 <- 'B'

datatest %>% rename_with(~c(name1, name2), c(col1, col2))

#If there are only two columns in datatest
datatest %>% rename_with(~c(name1, name2))

#  A B
#1 1 A
#2 2 B
#3 3 C
#4 4 D

2. 使用命名向量

name <- c(A = 'col1', B = 'col2')
datatest %>% rename(!!name)

Answer 2

您可以尝试

datatest %>% rename({{name1}} := col1, {{name2}} := col2)

  A B
1 1 A
2 2 B
3 3 C
4 4 D

Answer 3

这是使用！setNames的另外一个选项

datatest %>% 
  rename(!!!setNames(names(.), c(name1, name2)))

  A B
1 1 A
2 2 B
3 3 C
4 4 D