From 958f54c6465910029b787158a2dde58f782d0a00 Mon Sep 17 00:00:00 2001
From: "patrick.lambert" <patrick.lambert@irstea.fr>
Date: Mon, 30 Sep 2019 12:05:03 +0200
Subject: [PATCH] copy of tempearture accotding to latitude

---
 exploration/scriptR/PatrickPrg.R | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/exploration/scriptR/PatrickPrg.R b/exploration/scriptR/PatrickPrg.R
index 4805044..00f56c3 100644
--- a/exploration/scriptR/PatrickPrg.R
+++ b/exploration/scriptR/PatrickPrg.R
@@ -1,8 +1,28 @@
 # see BruchPrg for upload of data
 
+# ======================================================================
+#  temp en fonction de la latitude
+# ====================================================================
+library(dplyr)
+
+extractTemp<-as.data.frame(tempData %>%
+                             filter(Year>1901 & Year <= 1910) %>%
+                             group_by(NOM,Lat)%>%
+                             summarize(meanSpring=mean(Spring)) 
+                           %>% arrange (Lat)
+)
+
+plot(extractTemp$Lat, extractTemp$meanSpring, pch=20)
+abline(v=49.25) # vire
+abline(v=53.75) # elbe
+
+
+abline(h=11)
+abline(h=12.5)
+
 
 # ========================================================================
-# effect tempertaure sur la reproduction
+# effect temperature sur la reproduction
 # ========================================================================
 
 thermalBevertonHolt = function (stock, temperature, juvenileTolerance) {
-- 
GitLab