Script_matriz.R

#Primero creamos una matriz de proyeccion (Leslie) y un vector de clases de estados con sus abundancias#
#Esta es la matriz#
A <- matrix(c(0, 0.5, 20, 0.3, 0, 0, 0, 0.5, 0.9), nr = 3, byrow = TRUE)
A

##      [,1] [,2] [,3]
## [1,]  0.0  0.5 20.0
## [2,]  0.3  0.0  0.0
## [3,]  0.0  0.5  0.9

#Este es el vector con las abundancias#
Nt <- matrix(c(100, 250, 50), ncol = 1)
Nt

##      [,1]
## [1,]  100
## [2,]  250
## [3,]   50

#Ahora realizamos la multiplicación de matrices entre la matriz de proyección y Nt para saber el número de individuos en el siguiente año para cada estado#
Nt1= A %*% Nt
Nt1

##      [,1]
## [1,] 1125
## [2,]   30
## [3,]  170