Commit d6fc7b15 authored by Poulet Camille's avatar Poulet Camille
Browse files

Change XMl for growth calibration

parent 10262818
library(XML)
#read the XML file to upload the set of parameters included in GR3D-US
fishXML <- xmlToList(xmlParse("../../data/input/northeastamerica/fishRIOBasin_Sapidissima.xml"))
fishXML <- xmlToList(xmlParse("../../data/input/northeastamerica/fishRIOBasin_Sapidissima_Old.xml"))
#Upload parameters linked to reproduction
reproducePar = data.frame(t(unlist(fishXML[[1]][["processes"]][["processesEachStep"]][["species.ReproduceAndSurviveAfterReproductionWithDiagnose"]]))) %>%
reproducePar = data.frame(t(unlist(fishXML[[1]][["processes"]][["processesEachStep"]][["species.ReproduceWithDiagnose"]]))) %>%
select(-c(synchronisationMode, reproductionSeason, proportionOfFemaleAtBirth,
sigmaRecruitment, maxNumberOfSuperIndividualPerReproduction, withDiagnose,
displayFluxesOnConsole)) %>%
......
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