R中的自动交互术语创建和测试
如果这是离题的话,我很乐意关闭它,但我很好奇是否有人知道R中有任何功能选择包尝试不同的交互组合。例如,如果我有3个变量R中的自动交互术语创建和测试,r,R,如果这是离题的话,我很乐意关闭它,但我很好奇是否有人知道R中有任何功能选择包尝试不同的交互组合。例如,如果我有3个变量[a,b,c],它可能测试a+b+c+a:b,a+b+c+a:c,以及a+b+c+b:c,作为模型选择过程的一部分。谢谢 我已经尝试了一点,下面是我的方法,也许它可以帮助您: values <- c(a = 1, b = 2, c = 3) combinations <- combn(x = 3, m = 2) vapply(1:length(values), f
[a,b,c]
,它可能测试a+b+c+a:b
,a+b+c+a:c
,以及a+b+c+b:c
,作为模型选择过程的一部分。谢谢 我已经尝试了一点,下面是我的方法,也许它可以帮助您:
values <- c(a = 1, b = 2, c = 3)
combinations <- combn(x = 3, m = 2)
vapply(1:length(values), function(x){
one <- values[combinations[1,x]]
two <- values[combinations[2,x]]
return(values["a"] + values["b"] + values["c"] + one*two)
}, FUN.VALUE = 1)
# [1] 8 9 12
值谢谢,这是一个很好的方法,但它可能不会太容易扩展不?我希望有人知道已经构建了一个包来实现这一点。您也可以将函数传递给combn()
-combn(例如,字母[1:3],2,FUN=paste,collapse=“:”)
。交互是R中的:
,而不是*