| 서산 | 풍향 | >shapiro.test(sample(seototal$f_w.dir,5000)) | >shapiro.test(sample(seototal$w.dir,5000)) |
| Shapiro-Wilk normality test data: | Shapiro-Wilk normality test data: |
| sample(seototal$f_w.dir, 5000) | sample(seototal$w.dir, 5000) |
| W = 0.86376, p-value < 2.2e-16 | W = 0.90273, p-value < 2.2e-16 |
| 풍속 | >shapiro.test(sample(seototal$f_w.speed,5000)) | >shapiro.test(sample(seototal$w.speed,5000)) |
| Shapiro-Wilk normality test data: | Shapiro-Wilk normality test data: |
| sample(seototal$f_w.speed, 5000) | sample(seototal$w.speed, 5000) |
| W = 0.4667, p-value < 2.2e-16 | W = 0.91564, p-value < 2.2e-16 |
| 시정 | >shapiro.test(sample(seototal$f_visi,5000)) | >shapiro.test(sample(seototal$visi,5000)) |
| Shapiro-Wilk normality test data: | Shapiro-Wilk normality test data: |
| sample(seototal$f_visi, 5000) | sample(seototal$visi, 5000) |
| W = 0.76523, p-value < 2.2e-16 | W = 0.72255, p-value < 2.2e-16 |
| 운고 | >shapiro.test(sample(seototal$f_height,5000)) | >shapiro.test(sample(seototal$height,5000)) |
| Shapiro-Wilk normality test data: | Shapiro-Wilk normality test data: |
| sample(seototal$f_height, 5000) | sample(seototal$height, 5000) |
| W = 0.59528, p-value > 2.2e-16 | W = 0.78085, p-value < 2.2e-16 |