Displaying 1 result from an estimated 1 matches for "maxmat".
Did you mean:
maxmam
2004 Mar 17
1
ANCOVA when you don't know factor levels
...<-factor(temp.data$Morph)
model<-lm(temp.data$Y1~temp.data$X1*temp.data$Morph)
Lines[i,3]<-round(summary(model)$r.squared,6)
}
print(Lines)
Lines<-data.frame(Lines)
Max<-max(Lines$Rsqr)
MaxI<-Lines$Int[Lines$Rsqr==Max]
MaxS<-Lines$Slp[Lines$Rsqr==Max]
Maxmat<-cbind(MaxI,MaxS)
print(Maxmat)
}