Commit 908ee0f6 authored by Poulet Camille's avatar Poulet Camille
Browse files

New logit function with log19 for spawner survival after reproduction

parent d9fa54db
......@@ -190,6 +190,13 @@ spawnerSurvivalPostReproductionTempRef <- function(Triver,Tref, coeffa, coeffb){
}
#Logit for survival after reproduction with log19
#similar to spawnerSurvivalPostReproductionWithTempRef which include a
logit2 = function(Triver, Tref,minTempForIteroparity){
return( 1/ (1+exp((log(19)/(minTempForIteroparity-Tref))*(Triver-Tref))))
}
#Dome-shape curve with temperature effect
spawnerSurvivalPostReproductionWithBellCurve <- function(Triver, Tmin, Topt, Tmax, coeffb){
......@@ -210,3 +217,4 @@ spawnerSurvivalPostReproductionWithBellCurve <- function(Triver, Tmin, Topt, Tma
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment