Ich möchte wissen, ob es möglich ist, Binomial-Glm mit Interaktionen in numerischen Variablen zu zeichnen. In meinem Fall:Plotten binomial glm mit Interaktionen in numerischen Variablen
##Data set artificial
set.seed(20)
d <- data.frame(
mating=sample(0:1, 200, replace=T),
behv = scale(rpois(200,10)),
condition = scale(rnorm(200,5))
)
#Binomial GLM ajusted
model<-glm(mating ~ behv + condition, data=d, family=binomial)
summary(model)
In einer Situation, in behv und Zustand im Modell
#Plotting first for behv
x<-d$behv ###Take behv values
x2<-rep(mean(d$condition),length(d_p[,1])) ##Fixed mean condition
# Points
plot(d$mating~d$behv)
#Curve
curve(exp(model$coefficients[1]+model$coefficients[2]*x+model$coefficients[3]*x2)
/(1+exp(model$coefficients[1]+model$coefficients[2]*x+model$coefficients[3]*x2)))
Bedeutung ist aber nicht funktioniert !! Es gibt einen anderen richtigen Ansatz?
Dank