In-Class Exercise #4 done by me, myself and I (and guided by Prof Kam).
To start with, ggstatsplot and
tidyverse packages will be
installed (if not yet) and launched using library().
packages = c('ggstatsplot','tidyverse')
for(p in packages){
if(!require(p, character.only = T)){
install.packages(p)
}
library(p, character.only = T)
}
exam <- read_csv('data/Exam_data.csv')
ggbetweenstats(
data = exam,
x = RACE,
y = ENGLISH,
type = "p"
)
ggbetweenstats(
data = exam,
x = RACE,
y = ENGLISH,
type = "np"
)
set.seed(1234)
ggbetweenstats(
data = exam,
x = RACE,
y = ENGLISH,
type = "bayes"
)