#segundo ejercicio de la materia de PyE
#U1A2
#tablas de frecuencia e histogramas
setwd("~/PyE")
#paquetes
library(fdth)
##
## Attaching package: 'fdth'
## The following objects are masked from 'package:stats':
##
## sd, var
#datos
#temperatura media normal (1951-2010) de la estacion smn ema conagua de alamos, sonora
#https://smn.conagua.gob.mx/tools/RESOURCES/Normales5110/NORMAL26002.TXT
#variables
A <- 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)
#tabla de frecuencias absolutas
dist <- fdt(A,breaks="Sturges")
#ordenar de menor a mayor
sort(A)
## [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
#histograma de frecuencias Absolutas
hist(A)

#elaboracion de histogramas y poligonos de frecuencia
#Histograma de frecuencias absolutas
plot(dist, type ="fh")

#Polígono de frecuencias absolutas
plot(dist, type ="fp")

#Histograma de frecuencias relativas
plot(dist, type ="rfh")

#Polígono de frecuencias relativas
plot(dist, type ="rfp")

#Histograma de frecuencias acumuladas
plot(dist, type ="cfh")

#HPolígono de frecuencias acumuladas
plot(dist, type ="cfp")

#datos
#temperatura media normal (1951-2010) de la estacion smn ema conagua de Huatabampo, sonora
HUATA <- c( 16.5, 17.3, 18.9, 21.3, 23.8, 28.2, 30.4, 30.4, 29.8, 26.2, 20.7, 17.2)
#tabla de frecuencias absolutas
X <- fdt(HUATA,breaks="Sturges")
#ordenar de menor a mayor
sort(HUATA)
## [1] 16.5 17.2 17.3 18.9 20.7 21.3 23.8 26.2 28.2 29.8 30.4 30.4
#histograma de frecuencias Absolutas
hist(HUATA)

#elaboracion de histogramas y poligonos de frecuencia
#Histograma de frecuencias absolutas
plot(X, type ="fh")

#Polígono de frecuencias absolutas
plot(X, type ="fp")

#Histograma de frecuencias relativas
plot(X, type ="rfh")

#Polígono de frecuencias relativas
plot(X, type ="rfp")

#Histograma de frecuencias acumuladas
plot(X, type ="cfh")

#Polígono de frecuencias acumuladas
plot(X,type="cfp")

#Redacción personal
#En este ejercicio elaboramos unas graficas para comparar la temperatura media normal de dos municipios
#(Álamos – Huatabampo). Las gráficas que utilizamos en este ejercicio fueron el histograma de
#frecuencias relativas, de frecuencias absolutas y de frecuencias acumuladas. También obtuvimos el
#polígono de frecuencias relativas, de frecuencias acumuladas, y de frecuencias absolutas.
#Una vez obtenido estos datos pudimos observar que Álamos tenía temperaturas más bajas que
#Huatabampo. Pero en el caso del municipio más caluroso Huatabampo tuvo temperaturas mas elevadas.
#¿Qué es un histograma?
#Un histograma es una representación gráfica de una variable en forma de barras, donde la superficie de
#cada barra es proporcional a la frecuencia de los valores representados.
#¿Qué es un polígono?
#Polígono de frecuencia es el nombre que recibe una clase de gráfico que se crea
#a partir de un histograma de frecuencia.