From d43fcf3e02a01145ca186ef050e28266514793a3 Mon Sep 17 00:00:00 2001
From: "camille.poulet" <camille.poulet@irstea.fr>
Date: Wed, 24 Mar 2021 17:15:27 +0100
Subject: [PATCH] Correction_GR3D_function
---
exploration/GR3D_Rdescription/GR3Dfunction.R | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/exploration/GR3D_Rdescription/GR3Dfunction.R b/exploration/GR3D_Rdescription/GR3Dfunction.R
index a8a2884..ee007ca 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)
--
GitLab