Scores for two groups of school children taught by different math teachers and tested for both basic math (BM) problems and solving word problems (WP).
A data frame with 12 observations on the following 3 variables.
a factor with levels
Basic Math score, a numeric vector
Word Problems score, a numeric vector
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
data(mathscore) str(mathscore) math.mod <- lm(cbind(BM, WP) ~ group, data=mathscore) car::Anova(math.mod) # scatterplot with data ellipses car::scatterplot(WP ~ BM | group, data=mathscore, ellipse=list(levels=0.68), smooth=FALSE, pch=c(15,16), legend=list(coords = "topright")) # HE plot heplot(math.mod, fill=TRUE, cex=2, cex.lab=1.8, xlab="Basic math", ylab="Word problems")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.