dplyr：如何根据模式修改列名？ [复制]

Question

考虑这个简单的例子：

data <- data_frame('data::col1' = c(1,2,3), 'data::col2' = c(1,2,3))
> data
# A tibble: 3 × 2
  `data::col1` `data::col2`
         <dbl>        <dbl>
1            1            1
2            2            2
3            3            3

这种数据帧是使用 Apache Pig 得到的输出。在这里，我可以使用dplyr 加载它，但正如您所见，列的名称很麻烦。

如何使用tidyverse 套件去除:: 之前的部分？另外，假设我有很多列的模式为data::mycol，所以理想的解决方案不需要手动输入每个受影响的列。

预期输出：

# A tibble: 3 × 2
   col1  col2
  <dbl> <dbl>
1     1     1
2     2     2
3     3     3

谢谢！

Answer 1

library(dplyr)
library(purrr)

data <- data.frame('data::col1' = c(1,2,3), 'data::col2' = c(1,2,3))
names(data) <- names(data) %>%
  gsub("data..", "", .)