从xtabs中的变量名访问数据

Question

这个问题很简单。我想通过xtabs函数来构建交叉语句。我还想以从向量中提取的字符串的形式向xtabs函数传递参数data=。

考虑以下MWE

dataframe_names <- c("DF1","DF2","DF3")
DF1 <- as.data.frame(UCBAdmissions)
xtabs(Freq ~ Gender + Admit, data=DF1)
# Admit
# Gender   Admitted Rejected
# Male       1198     1493
# Female      557     1278
dataframe_names[1]
# [1] "DF1"
xtabs(Freq ~ Gender + Admit, data=dataframe_names[1])
# Error in eval(predvars, data, env) : 
#   invalid 'envir' argument of type 'character'

我该如何通过这个论点呢？

Answer 1

您需要使用get

xtabs(Freq ~ Gender + Admit, data=get(dataframe_names[1]))
#         Admit
# Gender   Admitted Rejected
#   Male       1198     1493
#   Female      557     1278