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