# HISTOGRAMAS Y TABLA DE FRECUENCIA

setwd("~/3er Semestre/ProbYEst")
# activar paquetes
library('fdth')
## 
## Attaching package: 'fdth'
## The following objects are masked from 'package:stats':
## 
##     sd, var

set de datos climaticos de Alamos, Sonora.

https://smn.conagua.gob.mx/es/informacion-climatologica-por-estado?estado=son

Información de Alamos, Sonora.

# declarar variable según la regla de sturges
ALAMOS <- c(18.5,19.1,20.2,22.1,24.7,28.1,28.0,27.6,26.8,24.8,21.6,19.1)
dist <- fdt(ALAMOS, breaks="Sturges") # Calcula la distribución de frecuencias

Tabla de datos de Alamos

dist 
##     Class limits f   rf rf(%) cf  cf(%)
##  [18.315,20.328) 4 0.33 33.33  4  33.33
##  [20.328,22.341) 2 0.17 16.67  6  50.00
##  [22.341,24.355) 0 0.00  0.00  6  50.00
##  [24.355,26.368) 2 0.17 16.67  8  66.67
##  [26.368,28.381) 4 0.33 33.33 12 100.00
#nos brinda una tabla con los calculos de la distribución de frecuencias.
#Donde
#f= frecuencia absoluta
#rf= frecuencia relativa
#rf(%) frecuencia relativa porcentual
#cf= frecuencia acumulada
#cf(%)=frecuencia acumulada porcentual
sort(ALAMOS)
##  [1] 18.5 19.1 19.1 20.2 21.6 22.1 24.7 24.8 26.8 27.6 28.0 28.1

Generación de histogramas

#histograma de frecuencias absolutas
hist(ALAMOS, breaks="Sturges")

#Para mostrar multiples graficas en una ventana
par(mfrow=c(3,2)) # particiona mi ventana grafica en 3x2.
hist(ALAMOS, breaks = "Sturges") #histograma utilizando el numero de clases según Sturge

plot(dist, type="cfh")   #histograma de frecuencias acumulada
plot(dist, type="cfp")   #poligono de frecuencias acumulado
plot(dist, type="fh")
plot(dist, type="fh", col="blue") #si desea añadir color a su grafico
plot(dist, type="rfh")  #histograma de frecuencias relativas

Información de Mazatlan, Sonora.

#declarar variable egún la regla de sturges
MAZATLAN <- c(13.7,14.8,16.3,18.9,23.1,27.7,28.2,27.2,26.3,22.4,17.3,13.7)
dist1 <- fdt(MAZATLAN, breaks="Sturges") # Calcula la distribución de frecuencias

Tabla de datos de Mazatlan

dist1
##     Class limits f   rf rf(%) cf  cf(%)
##  [13.563,16.547) 4 0.33 33.33  4  33.33
##  [16.547,19.531) 2 0.17 16.67  6  50.00
##  [19.531,22.514) 1 0.08  8.33  7  58.33
##  [22.514,25.498) 1 0.08  8.33  8  66.67
##  [25.498,28.482) 4 0.33 33.33 12 100.00
#nos brinda una tabla con los calculos de la distribución de frecuencias.
#Donde
#f= frecuencia absoluta
#rf= frecuencia relativa
#rf(%) frecuencia relativa porcentual
#cf= frecuencia acumulada
#cf(%)=frecuencia acumulada porcentual

sort(MAZATLAN)
##  [1] 13.7 13.7 14.8 16.3 17.3 18.9 22.4 23.1 26.3 27.2 27.7 28.2

Generacion de histogramas de Mazatlan

#Para mostrar multiples graficas en una ventana
par(mfrow=c(3,2)) # particiona mi ventana grafica en 3x2.
hist(MAZATLAN, breaks = "Sturges") #histograma utilizando el numero de clases según Sturge

plot(dist1, type="cfh")   #histograma de frecuencias acumulada
plot(dist1, type="cfp")   #poligono de frecuencias acumulado
plot(dist1, type="fh")
plot(dist1, type="fh", col="blue") #si desea añadir color a su grafico
plot(dist1, type="rfh")  #histograma de frecuencias relativas

Conclusión

Mediante las graficas y las tablas podemos apreciar que en este caso Mazatlan tiene limites de temperatura más amplios que Alamos desde los 13 grados hasta los 28, como contrario Alamos está desde los 18 grados hasta los 28, las temperaturas maximas de ambos son muy similares, en cambio Mazatlan tiene las temperaturas minimas mas bajas. Esto quiere decir que Mazatlan es mas frio en algunas temporadas que Alamos pero pueden llegar a tener la misma temperatura cuando hace calor.