Para esto usaremos datos del numero de colmenas por año, segun datos oficiales de la FAO STAT, obtenido del atlas de abejas: https://atlasnacionaldelasabejasmx.github.io/atlas/cap5.html
setwd("~/Estadistica")
library(readr)
BeehivesMX <- read_csv("BeehivesMX.csv")
##
## -- Column specification --------------------------------------------------------
## cols(
## yearc = col_double(),
## Colmenas = col_double()
## )
head(BeehivesMX)#para conocer los primeros registros
## # A tibble: 6 x 2
## yearc Colmenas
## <dbl> <dbl>
## 1 1961 1985
## 2 1962 2
## 3 1963 13
## 4 1964 11
## 5 1965 920934
## 6 1966 96698
maximo <-max (BeehivesMX$Colmenas) ## valor mas grande
maximo
## [1] 920934
minimo <-min (BeehivesMX$Colmenas)
minimo
## [1] 2
rango <- (maximo-minimo)
rango
## [1] 920932
[1]2690500 [1]920934 [1]1769566
summary(BeehivesMX$Colmenas)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 2 24117 176090 143115 197201 920934
boxplot(BeehivesMX$Colmenas)
# IQR (Inter Quartil Range) = Q3 - Q1
RIC = IQR (BeehivesMX$Colmenas)
RIC
## [1] 173084
## Limite superior (Maxinum)
Q3 <- 2118172
limitesuperior <- (Q3+1.5*RIC)
limitesuperior
## [1] 2377798
## Limite inferior ( Minimo)