Prueba de hipótesis para un experimento
Se utilizarán datos de google trends para analizar si existe una relación entre las búsquedas de Septiembre con la independencia.
independencia
library(readr) #para leer datos
library(DT) # tablas interactivas
library(prettydoc) #documentos con mejor formato
setwd("~/Desktop/EAMJ1130") # folder de trabajo
datos <- read_csv("datos.csv") #importar datos##
## ── Column specification ────────────────────────────────────────────────────────
## cols(
## Septiembre = col_double(),
## Independencia = col_double()
## )
datatable(datos) #visualizar datos en tabla ¿Existe alguna relación?
- Matriz de coeficientes de correlación
cor(datos)## Septiembre Independencia
## Septiembre 1.0000000 0.1402383
## Independencia 0.1402383 1.0000000
Conclusión
Con un índice de correlación Pearson de 0.14 determinamos que existe una muy pequeña correlación, entre las busquedas relacionadas con el mes de septiembre y con la independencia.
independencia