DIVERSIDAD FLORISTICA

La información sobre la diversidad de especies nos permite tener en cuenta aspectos de conservación de flora y fauna, siendo estos en muchos casos patrimonio cultural. (Campo & Duval, 2014) El tratamiento de estos datos pueden ser tediosos, ya que existen casos donde los datos recopilados son bastos, sin embargo con ayuda de R y la funcionalidad de sus diferentes paquetes existentes hasta el momento, este proceso puede ser mas facil. Un ejemplo de estos paquetes es “vegan” para el desarrollo de procesos ecologicos es muy eficaz. (Klein, 2004)

MATRIZ ECOLÓGICA

Se muestra en esta matriz ecologica la presencia y abundancia de las 20 especies con mayor indice de valor de importancia evaluados en 4 transectos en el centro experimental Macuya, Ucayali.

datos <- read.table("E:/R_Programming/R_Aplicado_a_SIG/Markdown/Especies.txt", header = TRUE)
datos

Activamos el paquete “vegan” (library(vegan)) y visualizamos el número de especies por transecto evaluado.

library(vegan)

## Loading required package: permute

## Loading required package: lattice

## This is vegan 2.4-6

specnumber(datos)

## T_A T_B T_C T_D 
##  17  18  19  19

Vemos también el promedio de la abundancia de las especies.

apply(datos, 2, mean)

##  Altr  Asmu  Baac  Caco  Cefr  Chho  Clsp  Gtsp  Hesp  Inin  Inma  Mito 
##  5.75 14.25  4.25 10.75  4.75  4.75  5.25  4.25  6.75  5.25  7.75  4.25 
##  Netu  Oeba  Peam  Poto  Psla  Sagl  Soex  Trma 
##  4.25  4.50  7.50  4.00  5.50  9.00 11.75  5.00

boxplot(datos, ylab = "ABUNDANCIA", xlab = "ESPECIES",las=2)
abline(h=5)

Observamos en el anterior grafico de cajas, la media, el maximo valor y el minimo valor de las abundancias de las especias respecto a cada transecto.

DIVERSIDAD FLORISTICA

Para determinar la diversidad floristica de las especies, se utilizaron indices de biodiversidad, los cuales son los siguientes:

INDICE DE SHANNON

diversity(datos,"shannon")

##      T_A      T_B      T_C      T_D 
## 2.462409 2.681575 2.549127 2.799592

diversity(datos,index = "shannon", base = 2)

##      T_A      T_B      T_C      T_D 
## 3.552505 3.868695 3.677612 4.038957

INDICE DE SIMPSON Y RECIPROCO DE SIMPSON

diversity(datos,index ="simpson")

##       T_A       T_B       T_C       T_D 
## 0.8952858 0.9199943 0.8941690 0.9329213

diversity(datos,index ="invsimpson")

##       T_A       T_B       T_C       T_D 
##  9.549805 12.499102  9.449024 14.907863

Y en este ultimo grafico vemos la diversidad floristica de los transectos evaluados, donde observamos que el transecto mas diverso es el D.

barplot(diversity (datos, index = "shannon", base = 2), col = "green")
title(main = "DIVERSIDAD DE SHANNON BASE 2", xlab = "PARCELAS", ylab = "HA´")

BIBLIOGRAFIA

Campo, A. M., & Duval, V. S. (2014). Diversidad y valor de importancia para la conservación de la vegetación natural. Parque Nacional Lihué Calel (Argentina). Anales de Geografía, 34, 25-42. https://doi.org/10.5209/rev_AGUC.2014.v34.n2.47071

Klein, E. (2004). Estructura de las comunidades Una guía de análisis de datos utilizando R, 1-19. https://doi.org/4901