1.2 Actividad Autonoma Practica

Encuesta Nacional de Salud y Nutrición 2018

El presente trabajo se realizo en base a la información obtenida en el INEC

Cargar las librerías necesarias

library(dplyr) # Para manipular los datos library(ggplot2) # Para crear gráficos library(“foreign”) #Cargas datos .dta library(“msm”) library(“car”) require(plotrix) library(“plotrix”)

#Cambiar mi directorio de trabajo setwd(“C:/Users/JHON/Desktop/1.2 Actividad Autonoma Bussn”)

setwd(“C:/Users/JHON/Desktop/1.2 Actividad Autonoma Bussn”)

package 'foreign' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\JHON\AppData\Local\Temp\Rtmp0OATB1\downloaded_packages

[1] 162.6633

En este caso, se observa que el promedio de las mujeres en el año 2018 fue de $162.66 el cual se encuentra por debajo del umbral del SBU.

[1] 329.8832

La desviación estándar registrada fue de 329,88 dólares, lo que refleja una considerable dispersión en los ingresos y pone en evidencia marcadas desigualdades entre las mujeres. Esta amplitud en la variación sugiere que, si bien algunas podrían tener ingresos similares o superiores al SBU, una gran mayoría percibe montos significativamente menores. Esta situación da cuenta de una realidad económica precaria y subraya la urgencia de implementar políticas públicas que promuevan la equidad salarial y el acceso a trabajos justos y de calidad.

[1] 329.8832

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
    0.0     0.0     0.0   162.7   200.0  3000.0 

[1] 18.16269

El error estándar de 18,16 señala que la estimación es precisa; sin embargo, también pone de manifiesto la existencia de disparidades en los ingresos. Esto resalta la importancia de implementar políticas que fomenten una mayor equidad económica.

[1] 35.59821

[1] 127.0651

[1] 198.2615

El intervalo de confianza para la media de 'ingrl' es: [ 127.0651 , 198.2615 ]

     IC_inferior    media IC_superior
[1,]    127.0651 162.6633    198.2615

Forma Simplificada de encontrar Intervalos

[1] 157.6220 167.7046
attr(,"conf.level")
[1] 0.95

package 'plotrix' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\JHON\AppData\Local\Temp\Rtmp0OATB1\downloaded_packages

[1] 0.2202298

[1] 16451

En la muestra analizada se obtuvo un valor de 0,2202, lo que revela una proporción significativa de la población con una característica particular. Este dato, combinado con el bajo promedio de ingresos de las mujeres (162,66 dólares), pone en evidencia desigualdades estructurales. Es imprescindible una intervención inmediata a través de políticas públicas, ya que mejorar estas condiciones resulta fundamental para el bienestar social.

[1] 0.003230912

El análisis arrojó un error estándar de 0,0032, lo que refleja una elevada precisión en la estimación del promedio de la variable analizada. Esta mínima variabilidad respalda la fiabilidad de los resultados y facilita la realización de inferencias representativas sobre la población.

[1] 0.006332472

El estudio muestra un margen de error de 0,0063, lo que representa un grado aceptable de precisión estadística en las estimaciones. Este resultado indica que los datos reflejan con fiabilidad las características de la población analizada. No obstante, más allá de la exactitud técnica, los hallazgos ponen en evidencia significativas desigualdades que requieren atención mediante políticas públicas enfocadas en promover la equidad en salud, ingresos y acceso a servicios esenciales. (Ortiz Collado, Cararach, and Tourne 2012)

[1] 0.2138973

[1] 0.2265622

El intervalo de confianza para la media de 'mujeres con depresión post partol' es: [ 0.2138973 , 0.2265622 ]

     IC_inferiorp         p IC_superiorp
[1,]    0.2138973 0.2202298    0.2265622

        IC_low         p   IC_high
[1,] 0.2138973 0.2202298 0.2265622

#Una forma más simplificada de calcular un intervalo de confianza para #proporciones

[1] 0.2139329 0.2266579
attr(,"conf.level")
[1] 0.95

Ejemplo 3: Prueba de hipótesis de medias

Hipótesis:

H0: El ingreso promedio poblacional es igual a 450USD

HA: El ingreso promedio poblacional es diferente a 450USD

    One Sample t-test

data:  data$ingrl
t = -111.72, df = 16450, p-value < 2.2e-16
alternative hypothesis: true mean is not equal to 450
95 percent confidence interval:
 157.6220 167.7046
sample estimates:
mean of x 
 162.6633 

#p valor significativo, por lo tanto, rechazo la hipótesis nula y no rechazo la #hipótesis alternativa # Interpretar los resultados: # Si el valor p es menor a 0.05, rechazamos la hipótesis nula

Rechazamos la hipótesis nula: Entonces tenemos evidencia de que la media de 'ingrl' es diferente de 450.

    One Sample t-test

data:  data$ingrl
t = -111.72, df = 16450, p-value < 2.2e-16
alternative hypothesis: true mean is less than 450
95 percent confidence interval:
    -Inf 166.894
sample estimates:
mean of x 
 162.6633 

#p valor significativo, por lo tanto, rechazo la hipótesis nula y no rechazo la #hipótesis alternativa # Interpretacion de resultados

Rechazamos la hipótesis nula: Entonces tenemos evidencia de que la media poblacional de 'ingrl' es menor a 450.

Ejemplo 4: Prueba de hipótesis de proporciones

================================

Hipótesis:

H0: La proporción poblacional de mujeres con depresión post parto es igual a 0.10

HA: La proporción poblacional de mujeres con depresión post parto es diferente a 0.10

Nota: La hipótesis alternativa nunca contiene los signos “=”, “≤” o “≥”.

    1-sample proportions test with continuity correction

data:  sum(depresion == "Si", na.rm = TRUE) out of sum(!is.na(depresion)), null probability 0.1
X-squared = 2640.9, df = 1, p-value < 2.2e-16
alternative hypothesis: true p is not equal to 0.1
95 percent confidence interval:
 0.2139329 0.2266579
sample estimates:
        p 
0.2202298 

La prueba de hipótesis con un 95 % de confianza arrojó un valor p menor a 0,05, permitiendo rechazar la hipótesis nula. Esto sugiere que la proporción de mujeres con depresión posparto es significativamente diferente al 10 %, posiblemente mayor. Se destaca así la necesidad de reforzar la atención en salud mental materna y mejorar las políticas de apoyo psicológico.

Rechazamos la hipótesis nula: Entonces tenemos evidencia de que la proporción de 'depresion_pp' es diferente a 0.10.

Revision de Literatura

Según (Guerra, Dávalos Pérez, and Castillo Martínez 2017a, 2017b) La depresión es la principal causa de años perdidos por discapacidad en el mundo, y en mujeres la carga de la enfermedad es un 50% mayor que en varones. La depresión perinatal tiene mayor asociación con ansiedad, cronicidad y discapacidad que en otras etapas de la vida y es poco reconocida a pesar de su alta prevalencia y sus graves efectos en la salud de la madre y el feto. Se realizó un estudio en pacientes ingresadas y valoradas en una unidad de alto riesgo obstétrico en el proceso de implementación del programa durante los meses de enero a junio de 2014; se utilizaron la Escala de Depresión Prenatal de Edimburgo (EPDS) y un cuestionario previamente desarrollado para identificar la presencia de síntomas depresivos y factores de riesgo psicosocial. Se evaluó sistemáticamente a más de 600 mujeres, y se encontró que el 30,2% de las mujeres evaluadas tenían síntomas depresivos según la EPDS y el 3,6% había tenido ideas de autolesión en los últimos 7 días. Los factores relacionados evaluados indican una condición de vulnerabilidad de las mujeres con menor nivel socioeconómico. Los datos encontrados reiteran la importancia de detectar factores que normalmente el personal de salud no identifica ni interviene a lo largo de la vida y particularmente durante la gestación.

Referencias