Estos datos pueden ser encontrados en el siguiente enlace: https://smn.conagua.gob.mx/tools/RESOURCES/Normales5110/NORMAL26018.TXT
ob <- c(17.4, 18.6 , 20.3, 23.5, 26.9, 30.6, 31.9, 31.6, 31.0, 27.5 , 22.1, 17.9)
sort(ob, decreasing = FALSE)
## [1] 17.4 17.9 18.6 20.3 22.1 23.5 26.9 27.5 30.6 31.0 31.6 31.9
sort(ob, decreasing = TRUE)
## [1] 31.9 31.6 31.0 30.6 27.5 26.9 23.5 22.1 20.3 18.6 17.9 17.4
library(fdth)
##
## Attaching package: 'fdth'
## The following objects are masked from 'package:stats':
##
## sd, var
tabla <- fdt(ob)
tabla
## Class limits f rf rf(%) cf cf(%)
## [17.226,20.225) 3 0.25 25.00 3 25.00
## [20.225,23.223) 2 0.17 16.67 5 41.67
## [23.223,26.222) 1 0.08 8.33 6 50.00
## [26.222,29.22) 2 0.17 16.67 8 66.67
## [29.22,32.219) 4 0.33 33.33 12 100.00
plot(tabla, type="fh")
plot(tabla, type="fp")
*Histograma
plot(tabla, type="rfh")
plot(tabla, type="rfp")
plot(tabla, type="cfh")
plot(tabla, type="cfp")
mean(ob)
## [1] 24.94167
median(ob)
## [1] 25.2
library(modeest)
##
## Attaching package: 'modeest'
## The following object is masked from 'package:fdth':
##
## mfv
mlv(ob, method = "mfv")
## [1] 17.4 17.9 18.6 20.3 22.1 23.5 26.9 27.5 30.6 31.0 31.6 31.9
summary(ob)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 17.40 19.88 25.20 24.94 30.70 31.90
boxplot(ob)