Diagnóstico por Grupos Taxonómicos, Ecorregiones y Amenazas

1. Introducción: La Fauna Amenazada del Perú en Cifras

El Perú es reconocido como uno de los centros de megadiversidad biológica más sobresalientes del mundo. Esta extraordinaria riqueza faunística se enfrenta a crecientes presiones antropogénicas derivadas de la deforestación, el avance agropecuario, la minería aluvial y metálica, la contaminación por efluentes y pesticidas, las enfermedades infecciosas emergentes, el tráfico ilícito y el cambio climático global.

En esta viñeta se presenta una síntesis profunda y cuantitativa del estado de conservación de la fauna peruana, articulando los datos del paquete perufaunads004 con los cinco capítulos monográficos introductorios del Libro Rojo de la Fauna Silvestre Amenazada del Perú (SERFOR, 2018): - Anfibios: Alessandro Catenazzi y Rudolf von May (pp. 29–38). - Aves: Fernando Angulo Pratolongo (pp. 159–168). - Mamíferos: E. Daniel Cossios Meza (pp. 329–334). - Reptiles: José Pérez Z. (pp. 449–452). - Invertebrados terrestres: José Antonio Ochoa y Diana Silva (pp. 305–306).

library(perufaunads004)
library(dplyr)
library(ggplot2)
library(knitr)

2. Panorama General Multitaxa: DS 004-2014 vs. Libro Rojo

El marco legal del Decreto Supremo N° 004-2014-MINAGRI protege legalmente a 535 taxones, mientras que el Libro Rojo (SERFOR, 2018) recopila y analiza 528 taxones, incluyendo 381 fichas técnicas monográficas para las especies en situación de amenaza real (CR, EN, VU):

# Conteo de especies por clase y categoría en el DS 004-2014
resumen_ds004 <- ds004_fauna |>
  count(clase, ds004_categoria_codigo) |>
  tidyr::pivot_wider(
    names_from = ds004_categoria_codigo,
    values_from = n,
    values_fill = 0
  ) |>
  mutate(
    Total_Amenazadas = CR + EN + VU,
    Total_Protegidas = CR + EN + VU + NT + DD
  ) |>
  relocate(clase, CR, EN, VU, Total_Amenazadas, NT, DD, Total_Protegidas)

kable(
  resumen_ds004,
  col.names = c("Grupo Taxonómico", "CR", "EN", "VU", "Amenazadas (CR+EN+VU)", "NT", "DD", "Total Legal (DS 004)"),
  caption = "Especies de fauna silvestre según categoría de conservación en el D.S. N° 004-2014-MINAGRI."
)

df_plot <- ds004_fauna |>
  mutate(ds004_categoria_codigo = factor(ds004_categoria_codigo, levels = c("DD", "NT", "VU", "EN", "CR")))

ggplot(df_plot, aes(x = clase, fill = ds004_categoria_codigo)) +
  geom_bar(position = "stack", color = "white", linewidth = 0.3) +
  scale_fill_manual(
    name = "Categoría",
    values = c(
      "CR" = "#7f0000",
      "EN" = "#d7301f",
      "VU" = "#fc8d59",
      "NT" = "#fed976",
      "DD" = "#bdbdbd"
    )
  ) +
  labs(
    title = "Especies de Fauna Protegida en el Perú por Grupo Taxonómico",
    subtitle = "D.S. N° 004-2014-MINAGRI y Libro Rojo (SERFOR, 2018)",
    x = "Grupo Taxonómico",
    y = "Número de Especies"
  ) +
  theme_minimal(base_size = 11) +
  theme(
    legend.position = "right",
    plot.title = element_text(face = "bold")
  )

Distribución de especies amenazadas (CR, EN, VU) y protegidas (NT, DD) por clase zoológica.

3. Diagnóstico Específico por Grupos Faunísticos

# Consultar anfibios en Peligro Crítico con ficha técnica
anfibios_cr <- libro_rojo_fichas |>
  filter(ficha_grupo == "Anfibios", grepl("^CR", ficha_categoria)) |>
  select(canonical_name, family_name, ficha_categoria, autores) |>
  head(6)

kable(anfibios_cr, col.names = c("Especie", "Familia", "Categoría / Criterios", "Autores de la Ficha"),
      caption = "Muestra de anfibios peruanos categorizados En Peligro Crítico (CR).")

# Identificar aves en Peligro Crítico presentes en el Libro Rojo
aves_cr <- libro_rojo_fichas |>
  filter(ficha_grupo == "Aves", grepl("^CR", ficha_categoria)) |>
  select(canonical_name, family_name, common_name, ficha_categoria)

kable(aves_cr, col.names = c("Especie", "Familia", "Nombre Común", "Categoría / Criterios"),
      caption = "Aves en Peligro Crítico (CR) evaluadas en el Libro Rojo de Fauna Silvestre.")

# Órdenes de mamíferos amenazados en el DS 004
mamiferos_ordenes <- ds004_fauna |>
  filter(clase == "Mamíferos") |>
  count(genus, ds004_categoria_codigo) |>
  head(10)

# Especies de invertebrados en el DS 004
invertebrados_ds004 <- ds004_fauna |>
  filter(clase == "Invertebrados") |>
  select(scientific_name, ds004_categoria_codigo, common_name)

kable(invertebrados_ds004, col.names = c("Nombre Científico", "Categoría", "Nombre Común"),
      caption = "Invertebrados terrestres legalmente protegidos en el Perú (D.S. N° 004-2014-MINAGRI).")

4. Síntesis y Recomendaciones Estratégicas de Conservación

1. Priorización ecorregional en las Yungas y Bosques Montanos: Las vertientes orientales de los Andes (Yungas) concentran el mayor número absoluto de vertebrados amenazados (anfibios de quebrada, aves de sotobosque y mamíferos medianos), donde la expansión agropecuaria y la fragmentación deben detenerse con máxima prioridad.
2. Urgencia en la Costa y Bosques Secos: La Región Tumbesina y el Desierto Costero, a pesar de su reducida superficie territorial, contienen densidades desproporcionadas de especies amenazadas y altos endemismos (saurios y aves terrestres), fuertemente impactados por la expansión urbana, la agricultura no sostenible y la caza por temor.
3. Control del hongo quítrido (Bd) y especies invasoras: Es imperativo monitorear patógenos emergentes en las redes fluviales andinas y regular la introducción y dispersión de la trucha arcoíris en cuencas con presencia de anfibios amenazados (Telmatobius, Atelopus).
4. Fortalecimiento de la taxonomía nacional: Urge financiar inventarios biológicos en invertebrados terrestres y micromamíferos, así como modernizar las colecciones entomológicas y zoológicas nacionales.

Referencias

• Aguilar, P. G., et al. (1995). Sinopsis sobre la entomofauna peruana. Revista Peruana de Entomología, 37, 1–9.
• Angulo Pratolongo, F. (2018). Actualización del conocimiento del estado de conservación de las aves del Perú. En: Libro Rojo de la Fauna Silvestre Amenazada del Perú (pp. 159–168). SERFOR, Lima.
• Catenazzi, A., & von May, R. (2018). Estado de conservación de los anfibios en el Perú. En: Libro Rojo de la Fauna Silvestre Amenazada del Perú (pp. 29–38). SERFOR, Lima.
• Cossios Meza, E. D. (2018). La diversidad de mamíferos del Perú en el contexto mundial. En: Libro Rojo de la Fauna Silvestre Amenazada del Perú (pp. 329–334). SERFOR, Lima.
• MINAGRI (2014). Decreto Supremo N° 004-2014-MINAGRI. Diario Oficial El Peruano, 8 de abril de 2014.
• Ochoa, J. A., & Silva, D. (2018). Invertebrados terrestres amenazados del territorio peruano. En: Libro Rojo de la Fauna Silvestre Amenazada del Perú (pp. 305–306). SERFOR, Lima.
• Pérez Z., J. (2018). Evaluación del Estado de Conservación de los Reptiles presentes en el Perú. En: Libro Rojo de la Fauna Silvestre Amenazada del Perú (pp. 449–452). SERFOR, Lima.
• SERFOR (2018). Libro Rojo de la Fauna Silvestre Amenazada del Perú. Servicio Nacional Forestal y de Fauna Silvestre, Lima, Perú. 548 pp.