Introduccion a la prueba de hipotesis
En este trabajo representaremos la relación que hay entre el día demuertos y las calaveras por medio de búsquedas de google y llegar a la conclusión sobre si tienen correlación o no
Bibliotecas y datos
setwd("~/Estadistica")
library(prettydoc)
library(DT)
library(readr)
library(reactable)
calaveras <- read_csv("calaveras.csv")##
## -- Column specification --------------------------------------------------------
## cols(
## `Dia de Muertos` = col_double(),
## Calaveras = col_double()
## )Primera Visualización
Podemos ver que en nuestra primera tabla se mantiene en un nivel bajo las dos búsquedas, una vez que está empieza a llegar a finales de Octubre y principios de Noviembre podemos notar como suben de igual manera,lo que nos da indicios sobre que las dos si están relacionadas entre sí
datatable(calaveras)Segunda Visualización
Nos encontramos con el mismo caso en la segunda tabla de visualización que tenemos, los dos aumentan a finales de Octubre y principios de Noviembre
reactable(calaveras)Tercera Visualización
Llegamos a la tercera visualización la cual nos dice que el porcentaje de relación entre estos dos es de un 95 porciento, lo cual claramente indíca que las dos están relacionadas
cor(calaveras)## Dia de Muertos Calaveras
## Dia de Muertos 1.0000000 0.9423211
## Calaveras 0.9423211 1.0000000Conclusión
Las búsquedas de el día de muertos y calaveras están claramente relacionadas ya que se presentan en las mismas fechas en las que el día de muertos ocurre y a su vez la búsqueda de calaveras se presenta enlas mismas fechas por que a la gente le interesa saber sobre ellas solo en esas fechas