# Input Data
nilai =read.table(choose.files(), header=TRUE)
nilai
## NOMOR NAMA NILAI
## 1 1 A 40
## 2 2 B 50
## 3 3 C 50
## 4 4 D 60
## 5 5 F 60
## 6 6 G 60
## 7 7 H 70
## 8 8 I 70
## 9 9 J 70
## 10 10 K 70
## 11 11 L 80
## 12 12 M 80
## 13 13 N 80
## 14 14 O 90
## 15 15 P 90
## 16 16 Q 100
x = nilai$NILAI
summary(x)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 40 60 70 70 80 100
library(nortest)
lillie.test(x)
##
## Lilliefors (Kolmogorov-Smirnov) normality test
##
## data: x
## D = 0.125, p-value = 0.7235