如何向文件列表中添加新变量

Question

如果我想在我的环境中为所有名称为_OK的数据集构建一个STUDYID+SUBJECT的变量ID，我应该怎么做?我能想到

list<-mget(ls(pattern = "_OK$"))

然后我可以创建新的变量ID与名称_OK的所有数据帧?我认为lapply或map应该工作，但我不确定如何使用这两个。有人能帮我树立榜样吗?

谢谢。

Answer 1

您可以使用:

list_data <-mget(ls(pattern = "_OK$"))
lapply(list_data, function(x) transform(x,ID = paste(STUDYID,SUBJECT,sep = "-")))

或使用tidyverse:

library(dplyr)
library(purrr)
map(list_data, ~.x %>% mutate(ID = paste(STUDYID,SUBJECT,sep = "-")))