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

Question

如果关闭主题，请高兴地关闭它，但我很好奇是否有人知道R中的任何功能选择包尝试不同的交互组合。例如，如果我有3个变量[a,b,c]，它可能会测试a+ b + c + a:b，a+ b + c + a:c和a+ b + c + b:c作为模型选择过程的一部分。谢谢！

Answer 1

我尝试了一下，这是我的方法，也许它可以帮到你：

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