用magrittr重命名列表

Question

我一直在玩magrittr，我非常喜欢生成的代码。它是干净的，并能真正节省打字。

如何在magrittr中重命名list元素：

在典型基数R中：

data_lists <- paste0("q",2011:2015)
data_lists <- lapply(data_lists,get)
names(data_lists) <- paste0("q",2011:2015)

在magrittr里，我想：

data_lists <- 
   paste0("q",2011:2015) %>%
   lapply(.,get) %>%
   names(.) %<>% paste0("q",2011:2015) # this is wrong

但是..。没有骰子。

Answer 1

Magrittr对这种性质的问题使用了许多别名。下面是一个使用别名set_names()的示例序列

data_lists <- 
   paste0("q",2011:2015) %>%
   lapply(.,get) %>%
   set_names(paste0("q",2011:2015))

更多别名请参见?extract

Answer 2

因为R中的所有内容都是一个函数(主要是)，所以您也可以这样做

data_lists <-
    paste0("q",2011:2015) %>%
    lapply(.,get) %>%
    `names<-`(paste0("q",2011:2015))