获取函数或在R中传递字符变量名

获取函数或在R中传递字符变量名,r,list,R,List,我有数据帧名MC_-df,我需要在MC_-df中获取一些变量的列表,以便通过我的函数进行访问,因此如果我通过vari_-names\u-MCdf手动操作,可能更容易处理包含数据帧的命名列表。有关提示,请参见gregor的答案。因为我需要返回一组特征表并将它们写入docx文件,所以我使用mapply函数,有时我需要访问100多个变量,使用不同的数据集,变量需要按报告模板排序。我得到了它,请使用eval(parse(text=“variable\u name\u here”)) MC_df <

我有数据帧名
MC_-df
,我需要在
MC_-df
中获取一些变量的列表,以便通过我的函数进行访问,因此如果我通过
vari_-names\u-MCdf手动操作,可能更容易处理包含数据帧的命名列表。有关提示,请参见gregor的答案。因为我需要返回一组特征表并将它们写入docx文件,所以我使用mapply函数,有时我需要访问100多个变量,使用不同的数据集,变量需要按报告模板排序。我得到了它,请使用eval(parse(text=“variable\u name\u here”))
MC_df <- data.frame(ID=c(1:5),Age=c(18,25,30,22,19),
                Year=c(2003,2010,2008,2010,2015),
                Education = c("<12","13-15",">15","<12",">15"),
                City = c("SD","MS","LA","CV","SD"),
                Country=c("US","CA","CA","CA","US"),
                Group=c(rep("group",5)))
vari_names_MCdf <- list(MC_df$Age, MC_df$Year, MC_df$Education, MC_df$City, MC_df$Country)
vari_group_MCdf <- list(MC_df$Group,MC_df$Group,MC_df$Group,MC_df$Group,MC_df$Group)
df <- data.frame(names=c("Age","Year","Education","City","Country"),
             text=c("Age Continuos","Year Category","Eduaction Group","City Category","Country Group"))
write.csv(df,"vari.csv")
var <- read.csv("vari.csv", stringsAsFactors = FALSE)
var
  X     names            text
1 1       Age   Age Continuos
2 2      Year   Year Category
3 3 Education Eduaction Group
4 4      City   City Category
5 5   Country   Country Group
get("MC_df")$vari_names[[1]]  
vari_names_new <- lapply(vari_names, function(i) paste0("MC_df$",i, sep=""))
get(vari_names_new[[1]])