Displaying 1 result from an estimated 1 matches for "vulbio".
Did you mean:
julio
2007 Mar 02
0
Matrix looping
...ngth(yr)+1),ncol=length(Nage))
Now the first row of my matrix needs to be the product of R0 and
Survship, no problem Nt[1,]<-Ro*Survship
I also need to create a new vector of egg production so
Eggs<-vector();Eggs[1]<-sum(Mat*Nt[1,])
I also calculate the vulnerable biomass for each year so
VulBio<-vector();VulBio[1]<-sum(Wt*Vul*Nt[1,])
Now I calculate the exploitation Ut<-min(0.99,ct[1]/VulBio[1])
For (i in 1:length(Nt[,1])){
Now I need to calculate the first column of values where;
Nt[i+1,1]<-a*Eggs[i]/(1+b*Eggs[i])
Eggs[i+1]<-sum(Mat*Nt[i+1,]
VulBio[i+1]<-sum(Wt*Vul*Nt[...