Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/66.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R中的自动交互术语创建和测试_R - Fatal编程技术网

R中的自动交互术语创建和测试

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

如果这是离题的话,我很乐意关闭它,但我很好奇是否有人知道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), 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中的
,而不是
*