Kuidas testida R-is andmete normaaljaotust? Üks lihtne viis selle tegemiseks on Shapiro-Wilk’i testi kasutamine.

setwd("C:/Users/Martin/Documents/Workspace/R/KMKT/Lisamaterjalid") # töökausta märkmine; võib ka teha käsitsi
load("praktikum1.RData") #laeb alla töökaustas oleva faili; võib ka teha käsitsi (vt, 1praktikumi juhend)

Testi nullhüpotees - andmed on normaaljaotusega.
Kui p-väärtus on suurem kui alfa, siis võib järeldada, et andmed on normaaljaotusega.

shapiro.test(tabel$ekstravertsus) 
## 
##  Shapiro-Wilk normality test
## 
## data:  tabel$ekstravertsus
## W = 0.98945, p-value = 0.1484

Histogramm:

hist(tabel$ekstravertsus)

Parameetrite lisamine aitab muuta joonist ilusamaks:

hist(tabel$ekstravertsus, breaks = 50, col = "blue", main = "Ekstravertsus", ylab="sagedus", xlab ="skoor", ylim = c(0,20), xlim = c(0,200))