powered by
data(chickwts.df)
chickweight
protein
protlevel
fish
data(chickwts.df) model1<-lm(chickweight~protein*protlevel*fish, data=chickwts.df) summary(model1)
Run the code above in your browser using DataLab