support for interaction terms

[holgerbrandl]

# works
lmModel = lm(len ~ supp+dose, data = ToothGrowth)

# does not work but would be great
lmModel = lm(len ~ supp*dose, data = ToothGrowth)
broken(lmModel, ToothGrowth[1,])

[pbiecek]

thanks, interactions are handled now

model <- lm(Sepal.Length~Petal.Width*Species, data=iris)
new_observation <- iris[1,]
br <- broken(model, new_observation)
plot(br)

unfortunately, support for other terms is more difficult
right now this will not work:

model <- lm(Sepal.Length~log(Petal.Width), data=iris)

[holgerbrandl]

Awesome, thanks a lot for the patch and the library itself.