# NOT RUN {
qqnorm(Music$differ)
qqline(Music$differ)
shapiro.test(Music$differ)
t.test(Music$method1, Music$method2, paired = TRUE)
# Or
t.test(Music$differ)
# }
# NOT RUN {
library(ggplot2)
ggplot2::ggplot(data = Music, aes(x = differ)) +
geom_dotplot() +
theme_bw()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab