重命名数据框的列

Question

我有一个数据框，基本上看起来像这样(包含数据):

t <- data.frame(x1 = 1:5, x2 = 1:5, stingsAsFactors = FALSE)

我有另一个数据框，其中包含原始列名称和每个列的替换

n <- data.frame(abb = c("x1", "x2"), erf = c("XX1", "XX2"), stringsAsFactors = FALSE)

我想做的是根据数据帧 n 中的规范重命名数据帧 t 中的列。我的问题是我不知道如何使用 map 做到这一点。为什么下面的错误是:

map2_dfr(n$abb, n$erf, function(x, y) rename(t, !!y := x))

Answer 1

我们可以使用rename_at

library(dplyr)
t %>%
    rename_at(n$abb, ~ n$erf)