The R script file and the data file can be found at multiple regression example 1-1 (univariate)
See the file attached at the bottom of this page.
This analysis is based on manova (multivariate anova; anova using a model with more than one response variable).