# 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