2

我有七个变量，我想创建许多新变量，每个变量都是七个变量的交互项。将有 2-way 到 5-way 交互。我计划分两步完成。

首先，创建变量名称的所有 m 路组合。其次，将名称转换为实变量。我已经完成了第一步，但不确定如何进行第二步。

我的第一步是：

xvec = c("white", "married", "inftype", "usecondom", "age", "edu", "part")

temp = t(combn(xvec, 2))
temp = paste(temp[,1], "*", temp[,2], sep="")

这给了我名称的所有双向组合/交互。但是，如何将名称转换为实变量？我曾经使用 get() 或 eval(parse()) 做类似的事情。但它们现在都不起作用。

提前致谢！

4

1 回答 1

1

关于第一步（不是你正在做的事情有问题），你可以创建这样的名称：

temp <- combn(xvec, 2, FUN=paste, collapse=".")

这会生成所有组合，然后使用paste它将组合折叠在一起。我使用., 因为*在变量名中不是很好。您还可以检查?make.names，一个使字符串适合用作名称的函数。

第二步 您可以使用assign从存储在变量中的字符串创建变量。（get当您将现有变量的名称作为字符串并想要访问它时）

尝试类似：

for(nm in make.names(temp)) {
  assign(nm, "Put something more interesting here")
}

您可以使用查看环境中的所有对象ls()

ls()
## [1] "age.edu"           "age.part"          "edu.part"         
## [4] "inftype.age"       "inftype.edu"       "inftype.part"     
## [7] "inftype.usecondom" "married.age"       "married.edu"      
## [10] "married.inftype"   "married.part"      "married.usecondom"
## [13] "nm"                "temp"              "usecondom.age"    
## [16] "usecondom.edu"     "usecondom.part"    "white.age"        
## [19] "white.edu"         "white.inftype"     "white.married"    
## [22] "white.part"        "white.usecondom"   "xvec"

现在你已经创建了很多变量。

就像评论一样，我想补充一下我可能会怎么做。

myCombs您可以使用列表 ( ) 来保存所有对象，而不是用大量对象填充您的环境。

myCombs <- combn(xvec, 2,simplify=FALSE, FUN = function(cmb) {
  res <- paste("This is the combination of", cmb[1], "and", cmb[2])
  res
})
##Add the names to the list items.
names(myCombs) <- combn(xvec, 2, FUN=paste, collapse=".")

我用这些术语来构造一个字符串。你可能想做一些更复杂的事情。如果您的xvec环境中有 的项目作为变量，您可以在此处使用get(cmb[1])和访问它们get(cmb[1])。

myCombs$NAME现在，您可以使用、 或访问每个变量，myComb[[NAME]]甚至可以attach(myComb)将整个列表访问到您的环境中。

 myCombs$edu.part
 ## [1] "This is the combination of edu and part"

我开始写一个小答案，但被带走了。希望这对你有帮助，

亚历克斯

于 2014-05-24T01:02:09.763 回答