Commit 837ac791 authored by peguerin's avatar peguerin
Browse files

check script R

parent b024805d
...@@ -61,7 +61,7 @@ latlon = spTransform(latlon,proj4string(chloBenthicMeanRa)) ...@@ -61,7 +61,7 @@ latlon = spTransform(latlon,proj4string(chloBenthicMeanRa))
############################################################################### ###############################################################################
## extract habitat information from coordinates ## extract Chlorophyll A abundance information from coordinates
#radius(rayon) du cercle du buffer ayant pour centre le point d'echantillonnage #radius(rayon) du cercle du buffer ayant pour centre le point d'echantillonnage
#cercle de 2 km de diametre #cercle de 2 km de diametre
......
...@@ -20,7 +20,7 @@ extract_variable <- function(ma_variable, repro_period, depth_range ){ ...@@ -20,7 +20,7 @@ extract_variable <- function(ma_variable, repro_period, depth_range ){
############################################################################### ###############################################################################
## Load data ## Load data
fichier="01-infos/CMEMS-MedSea_Reanalysis_Phys_006_004_0to210m_1987-2015_1m_votemper_vosaline_SampleLoc.nc" fichier="01-infos/salinity_et_temperature/CMEMS-MedSea_Reanalysis_Phys_006_004_0to210m_1987-2015_1m_votemper_vosaline_SampleLoc.nc"
samplecsv=read.csv("01-sample_coords/samples_labels.csv",sep="\t",header=F) samplecsv=read.csv("01-sample_coords/samples_labels.csv",sep="\t",header=F)
labels=as.character(samplecsv[,1]) labels=as.character(samplecsv[,1])
......
Supports Markdown
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