diff --git a/exploration/GR3D_Rdescription/GR3Dfunction.R b/exploration/GR3D_Rdescription/GR3Dfunction.R index a8a288414cbb5c8ec0b635f4f2520c9608ea79ce..ee007ca15cfd6b5435722ed13514b59ed91807b5 100644 --- a/exploration/GR3D_Rdescription/GR3Dfunction.R +++ b/exploration/GR3D_Rdescription/GR3Dfunction.R @@ -101,7 +101,7 @@ spawnerSurvivalPreReproduction <- function(Triver,Tmin, Topt, Tmax){ #River survival survProbOptRiver = survivePar$survProbOptRiver - spRiver = survProbOptRiver * TemperatureEffect(Triver, Tmin, Topt, Tmax) + spRiver = survProbOptRiver * temperatureEffect(Triver, Tmin, Topt, Tmax) #StockAfterSurv = S * SpRiver @@ -159,7 +159,7 @@ stockRecruitementRelationship <- function(Triver,Tmin, Topt, Tmax, survivalStock alleeEffect = 1/(1 + exp(-log(19)*(survivalStock - n/ratioS95_S50*surfaceWatershed)/(n*surfaceWatershed - n/ratioS95_S50*surfaceWatershed))) - Rj = (alphaj * SurvivalStock * alleeEffect)/(betaj + survivalStock * alleeEffect) + Rj = (alphaj * survivalStock * alleeEffect)/(betaj + survivalStock * alleeEffect) #Rj = ((aj * S) * p)/(Bj +S * p)