INTRODUCCIÓN
El Módulo sobre Eventos Culturales Seleccionados (MODECULT) genera información estadística sobre la asistencia a eventos culturales y la participación en actividades artísticas de la población en México. Lo anterior, a fin de proporcionar datos clave para contribuir al diseño de políticas públicas. Desde 2016 y hasta mayo de 2024, el módulo se levantó como parte de la Encuesta Nacional sobre Confianza del Consumidor (ENCO). A partir de 2025 el programa tiene una actualización conceptual y metodológica y se levanta con un operativo y muestra de viviendas independientes a la ENCO.
Comenzaremos por calcular los estadísticos descriptivos de laa variables que tienen que ver con la asistencia en los 12 últimos meses a eventos cultutales. En el cuadro uno se presentan las medidas descriptivas (media, mediana, n y desviación estándar)
| evento | n | media | mediana | sd |
|---|---|---|---|---|
| Teatro | 4240 | 0.28 | 0 | 1.15 |
| Conciertos | 4240 | 0.76 | 0 | 1.96 |
| Danza | 4240 | 0.39 | 0 | 1.21 |
| Museos o exposiciones | 4240 | 0.31 | 0 | 1.29 |
| Cine | 4240 | 1.80 | 0 | 4.38 |
| Ferias | 4240 | 0.87 | 0 | 1.78 |
| Otros espectáculos culturales | 4240 | 0.04 | 0 | 0.73 |
Podemos observar en esta tabla que las personas asisten a pocos eventos culturales de forma aual, dado a que en su mayoría las personas asisten al cine, ferias y después conciertos; y en su minoría al teatro y museos/exposiciones. Y también podemos analizar que solo un pequeño grupo de personas asisten de manera frecuentes mientras que una gran parte su asistencia es nula. Considero que tenemos que dejar de lado la parte económica ya que por los eventos con mayor asistencia requieren un capital. Más que nada, es necesario la generación de políticas públicas que fomenten la visita a espacios culturales y gratuitidad en eventos que nos accesibles para la mayoría de la población.
Vamos a recalcular el ejercicio sin considerar los ceros.
Para medir la intensidad de asistencia trabajaremos los que fueron por lo menos una vez a los eventos (donde la variable es mayor a cero).
| evento | porcentaje | n | media | mediana | sd |
|---|---|---|---|---|---|
| Teatro | 13.0 | 552 | 2.16 | 2 | 2.46 |
| Conciertos | 28.7 | 1219 | 2.64 | 2 | 2.89 |
| Danza | 18.5 | 784 | 2.12 | 1 | 2.05 |
| Museos o exposiciones | 13.9 | 591 | 2.24 | 1 | 2.75 |
| Cine | 35.0 | 1484 | 5.13 | 3 | 6.14 |
| Ferias | 39.2 | 1661 | 2.23 | 2 | 2.26 |
| Otros espectáculos culturales | 1.3 | 54 | 2.87 | 1 | 5.83 |
Las cifras obtenidas indican que el cine es la actividad consolidada como un hábito frecuente en nuestra muestra, ya que los asistenete van más de 3 veces al año. Por otra parte, también podemos ver que las ferias tienen más asistencia, pero, a diferencia del cine, la asistencia es poco frecuente. Mientras que para los museos y teatros, aunque los asistentes con pocos, sus visitas tienen frecuencia al ser más de dos. Por lo que podemos concluir que si es necesaria la fomentación de asistir a los espacios culturales y que haya más eventos de forma gratuita, como de obras de teatro (que suelen ser costosas).
##DADA LA BAJA PARTICIPACIÓN EN EVENTOS CULTURALES, AHORA VAMOS A EXPLORAR LAS CAUSAS DE ESTE FENOMENO
Causas…
Con estos datos, puedo deducir que el desinterés es el pricipal obstáculo, ya que en las tres gráficas el motivo “No me gusta” predomina, por lo tanto, no existe una barrera económica,ya que las razones que explican “por el costo” no es predominante, más bien una falta de de habitus cultural.
Como segundo punto importante, el tiempo y disponibilidad es una segunda razón predominante.
Exploro la asistencia al cine por sexo. A continuación se muestra una gráfica de asistencia dividida en hombre y mujer que muestra las medianas de asistencia de cada uno
Para solucionar el problema de los atípicos, lo haremos de una forma más acotada, quitaremos el 5% de valores más altos.
## 50% 75% 90% 95% 99%
## 3 6 10 15 30
Ahora vamos a omitir el 5% de valoresd más altos.
INTERPRETACIÓN Los hombres asisten más al cine y tienden a ir con frcuencia un poco mayor que las mujeres aunque es un poco más homogéneo. Pero en ambos sexos, las personas asisten entre 10 y 15 veces al año, aunque en el de mujer hay algunos casos aislados.
Ahora vamos a analizar la asistencia al teatro
INTERPRETACIÓN Podemos ver que la asistecia en el teatro tanto para hombres como para mujeres es muy esporádico, por lo que el género no es una variable
Ahora analizaremos la ““asistencia a feria**
INTERPRETACIÓN Los hombres asisten con mayor frecuencia (10 asistencias) que las mujeres aunque ellas asisten de forma frecuente (8 asistencias)
##ESTADÍSTICA INFERENCIAL CON LOS DATOS DE ASISTENCIA
¿Existen inferencias significativas en la asistencia al cine entre hombres y mujeres? Para responder esta prehunta tenemos 2 técnicas: estimación puntualy por intervalos y contrastes de hipótesis. Empezaremos con la estimación por intervalos o intervalos de confianza. En la gráfica 8 se muestran los intervalos para la media de la asistencia al cine.
Los hombres que asisten al cine lo hacen con mayor frecuencia promedio al año que las mujeres, y esta diferencia es estadísticamente contundente. Dentro de la población que asiste al menos una vez al cine, los hombres registran una media de asistencia más alta (5.0 veces al año) en comparación con las mujeres (4.3 veces al año).
Demuestra que no existe una diferencia estadísticamente significativa en la frecuencia media de asistencia al teatro entre hombres y mujeres que han asistió al menos una vez en el último año. Aunque la media estimada para las mujeres se sitúa ligeramente por encima (2.20 veces al año) en comparación con la de los hombres (2.14 veces al año), sus intervalos de confianza del 95% se superponen de manera casi total, compartiendo un rango de variabilidad prácticamente idéntico (aproximadamente entre 1.9 y 2.4 asistencias). Por lo tanto, bajo los criterios metodológicos de MODECULT 2025, la pequeña variación visual se debe al margen de error muestral y no a una brecha real, concluyendo matemáticamente que hombres y mujeres asisten al teatro con la misma frecuencia efectiva.
###COMIENZA CLASE 25/06/2026
Comenzaremos por contrastar las hipótesis referente a las diferencias por sexo, en primer lugar trabajaremos con la asistencia al cine. La pregunta es: ¿Existen diferencias significativas en el número promedio de veces que hombres y mujeres asistieron al cine durante los últimos doces meses?
La hipótesis estadística es:
Ho: μH= μM (no hay diferencia)
vs
Ha: μH ≠ μM (si hay diferencia)
## # A tibble: 2 × 4
## sexo2 n estadistico_W p_valor
## <fct> <int> <dbl> <dbl>
## 1 Hombre 701 0.820 2.75e-27
## 2 Mujer 782 0.792 1.99e-30
En ambos casos podemos ver que en ambos casos todo esta abajo de .5 por lo que no podemos asumir distribución en la variable que estamos analizando tanto de hombres como de mujeres, sin embargo las muestras son grandes (muestra mayor de 30)
Ahora vamos a ver si se cumple el supuesto de igualdad de varianzas (homogeneidad de varianzas) mediante la prueba de Levene (la hipótesis nula es que las varianzas son iguales)
## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 1 13.586 0.000236 ***
## 1481
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Al aplicar la prueba de Levene se encontro p valor menor a .05 por lo tanto se rechaza el supuesto de homogeneidad de varianzas por lo que no podemos asumir varianzas iguales
Finalmente aplicaremos la prueba t, en este caso lo haremos en sus dos versiones (clásica y welch). Recordemos que estamos contrastando:
Ho: μH= μM (no hay diferencia)
vs
Ha: μH ≠ μM (si hay diferencia)
# Prueba t de Welch (var.equal = FALSE)
t.test(p1_5a ~ sexo2, data = base, var.equal = FALSE, conf.level = 0.95)
##
## Welch Two Sample t-test
##
## data: p1_5a by sexo2
## t = 3.366, df = 1399, p-value = 0.0007834
## alternative hypothesis: true difference in means between group Hombre and group Mujer is not equal to 0
## 95 percent confidence interval:
## 0.2869879 1.0887669
## sample estimates:
## mean in group Hombre mean in group Mujer
## 4.974322 4.286445
# Prueba t clásica (var.equal = TRUE)
t.test(p1_5a ~ sexo2, data = base, var.equal = TRUE, conf.level = 0.95)
##
## Two Sample t-test
##
## data: p1_5a by sexo2
## t = 3.3907, df = 1481, p-value = 0.0007155
## alternative hypothesis: true difference in means between group Hombre and group Mujer is not equal to 0
## 95 percent confidence interval:
## 0.2899282 1.0858266
## sample estimates:
## mean in group Hombre mean in group Mujer
## 4.974322 4.286445
ASISTENCIA AL TEATRO
Contrastaremos las diferencias entre hombres y mujeres en cuanto a la asistencia al teatro
##
## Welch Two Sample t-test
##
## data: p1_1a by sexo2
## t = -0.13551, df = 1648.7, p-value = 0.8922
## alternative hypothesis: true difference in means between group Hombre and group Mujer is not equal to 0
## 95 percent confidence interval:
## -0.1305642 0.1136896
## sample estimates:
## mean in group Hombre mean in group Mujer
## 1.984713 1.993151
Con respecto al teatro, se encontro uno mayor a .05 por lo que no se rechaza la hipótesis de igualdad de medias. Es decir, se infiere que el promedio de asistencia al teatro de hombre no es significativamente al de las mujeres. Graficamnete se puede ver en la grafica 9.
AAAAA
## # A tibble: 5 × 3
## edad_grupo n p
## <fct> <int> <dbl>
## 1 12-17 212 6.48e-16
## 2 18-29 418 3.27e-20
## 3 30-44 432 1.59e-21
## 4 45-59 286 2.15e-20
## 5 60 y más 133 4.79e-13
## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 4 4.3512 0.001679 **
## 1476
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## Df Sum Sq Mean Sq F value Pr(>F)
## edad_grupo 4 343 85.63 5.655 0.000162 ***
## Residuals 1476 22348 15.14
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 2759 observations deleted due to missingness
##
## One-way analysis of means (not assuming equal variances)
##
## data: p1_5a and edad_grupo
## F = 7.445, num df = 4.00, denom df = 564.45, p-value = 7.558e-06
Se encontro P valor a 0.05 por lo tanto no se sumen varianzas iguales en los grupos de edad.
Al realizar la prueba nova, encontramos un p valor igual a .05por lo cual se rechaza la hipótesis nula sobre que todas las medias eran iguales. Por lo tanto indica que una es diferente.
Al calcular tener un valor de .02 lo cual indica que en la variable edad solo explica el 2% de la variabilidad de la asistencia al cine.
La prueba nova indica distintos valores, lo cual indica que el efecto es mediano
En conclusión, considerando las dos variables, edad y escolaridad, el nivel de escolaridad tiene un efecto mayor del 6% contra el 2% de la edad.