Se intenta estimar la tasa de letalidad (IFR) del coronavirus por edades en España, a partir de los fallecidos a causa del virus y el estudio de seroprevalencia realizado por el Ministerio de Sanidad. Las fuentes de los datos son:

Instituto de Salud Carlos III. COVID-19: Grupos de Población.

https://cnecovid.isciii.es/covid19/#grupos-de-poblaci%C3%B3n

INE. Población Española por grupos quinquenales de edad.

https://www.ine.es/jaxi/Tabla.htm?path=/t20/e245/p08/&file=02002.px&L=0

Informe de seroprevalencia ENE-COVID19

https://www.ciencia.gob.es/stfls/MICINN/Ministerio/FICHEROS/ENECOVID_Informe_preliminar_cierre_primera_ronda_13Mayo2020.pdf

Selecciono mi archivo excel, confeccionado con datos de las fuentes anteriores, y lo guardo en la variable “corona_ifr”.

knitr::opts_chunk$set(echo = TRUE)
corona_ifr<-read_excel("C:/Users/JoséIgnacio/AppData/Roaming/Microsoft/Windows/Network Shortcuts/ifr coronavirus 18-05.xlsx")

En mi archivo Excel he estimado cual es el número de casos por sexo y grupos de edad a partir del estudio de seroprevalencia y la población española por sexo y grupos de edad en 2019 publicada por el INE. En el archivo también constan los fallecidos por sexo en cada grupo de edad, que he obtenido de la información publicada por el Instituto de Salud Carlos III. Por lo tanto, estamos en disposición de saber cual es la tasa de letalidad del coronavirus en cada sexo y grupo de edad.

Veamos una gráfico de barras con el ratio en % de letalidad (IFR) por grupos de edad en hombres.

knitr::opts_chunk$set(echo = TRUE)
   
barplot(corona_ifr$`IFR HOMBRES`, names.arg=(corona_ifr$EDAD),xlim=c(0,140),las=2, ylim=c(0,25),width=5,space=0.5,
col="orange",
      main = "Tasa de letalidad por grupos de edad en hombres",
      xlab = " ",
      ylab = "Tasa de letalidad (%)",
      )

Podemos observar que la tasa de letalidad hasta 70 años es muy pequeña. Por ejemplo, en hombres de 45 a 49 años es de un 0,09%.

Veamos ahora la tasa de letalidad en mujeres por grupos de edad.

knitr::opts_chunk$set(echo = TRUE)
   
barplot(corona_ifr$`IFR MUJERES`, names.arg=(corona_ifr$EDAD),xlim=c(0,140),las=2, ylim=c(0,25),width=5,space=0.5,
col="orange",
      main = "Tasa de letalidad por grupos de edad en mujeres",
      xlab = " ",
      ylab = "Tasa de letalidad (%)",
      )

En mujeres, la tasa de letalidad es todavía menor, manteniéndose por debajo del 1% en todos los grupos de edad hasta los 74 años y no alcanzando el 10% en ningún grupo de edad. El grupo de edad con mayor tasa de letalidad es el de mayores de 90 años, donde ésta es del 7,91%.

Veamos ahora la tasa de letalidad acumulada de hombres y mujeres por grupos de edad. Los siguientes gráficos muestran cual es la tasa de letalidad en toda la población hasta el límite superior de ese grupo de edad.

knitr::opts_chunk$set(echo = TRUE)
   
barplot(corona_ifr$`IFR ACUMULADA HOMBRES`, names.arg=(corona_ifr$EDAD),xlim=c(0,140),las=2, ylim=c(0,2),width=5,space=0.5,
col="red",
      main = "Tasa de letalidad acumulada en hombres",
      xlab = " ",
      ylab = "Tasa de letalidad acumulada (%)",
      )

Podemos ver, que en conjunto, la tasa de letalidad en hombres es menor del 2%( 1,55%) y también que por debajo de 85 años la tasa es menor del 1% (0,92%)

knitr::opts_chunk$set(echo = TRUE)
   
barplot(corona_ifr$`IFR ACUMULADA MUJERES`, names.arg=(corona_ifr$EDAD),xlim=c(0,140),las=2, ylim=c(0,2),width=5,space=0.5,
col="red",
      main = "Tasa de letalidad acumulada en mujeres",
      xlab = " ",
      ylab = "Tasa de letalidad acumulada (%)",
      )

Como se puede ver, en mujeres en ningún caso la letalidad llega al 1%, siendo la letalidad del conjunto de la población femenina del 0,61%.

Veamos ahora en ambos sexos las tasas de letalidad hasta 70 años y a partir de 70 años. Para ello utilizo un archivo excel donde las he calculado en base a los datos ya referenciados.

knitr::opts_chunk$set(echo = TRUE)
corona_edades<-read_excel("C:/Users/JoséIgnacio/AppData/Roaming/Microsoft/Windows/Network Shortcuts/ifr edades coronavirus.xlsx")
barplot(corona_edades$`IFR HOMBRES (%)`, names.arg=(corona_edades$EDAD),xlim=c(0,80),las=2, ylim=c(0,10),width=5,space=0.5,
col="red",
      main = "Tasa de letalidad en hombres",
      xlab = "Edad",
      ylab = "Tasa de letalidad acumulada (%)",
      )

barplot(corona_edades$`IFR MUJERES (%)`, names.arg=(corona_edades$EDAD),xlim=c(0,80),las=2, ylim=c(0,10),width=5,space=0.5,
col="red",
      main = "Tasa de letalidad en mujeres",
      xlab = "Edad",
      ylab = "Tasa de letalidad acumulada (%)",
      )

Se puede ver que la letalidad a partir de 70 años es mucho mayor en ambos sexos. Así, en hombres, hasta 70 años, la letalidad es de 0,44%, y a partir de 70 años, de 9,03%, unas 20 veces mayor.

En mujeres, hasta 70 años, la letalidad es de sólo 0,13%, mientras que a partir de 70 años, de 2,92%, unas 21 veces mayor.

La conclusión es que la letalidad del coronavirus en España es muy pequeña hasta 70 años, por lo que, dado el bajo y decreciente número de hospitalizados en este momento a causa del virus, lo que permite atender adecuadamente la demanda hospitalaria ante un eventual repunte de la enfermedad, se sugiere que se levanten las medidas de confinamiento y restricciones y se pongan en marcha medidas de protección de la población mayor de 70 años, como puede ser la distribución gratuita de mascarillas y suplementos de vitamina D* a estas personas en farmacias, así como campañas informativas dirigidas a toda la población sobre medidas de prevención tales como el consumo de dicha vitamina y medidas de higiene.

*Se ha encontrado evidencia de que la carencia de esta vitamina está asociada a una mayor mortalidad por COVID-19.

Más información:

https://www.researchsquare.com/article/rs-21211/v1

http://imj.ie/optimisation-of-vitamin-d-status-for-enhanced-immuno-protection-against-covid-19/