EcoBase is an open-access database of Ecopath with Ecosim (EwE) models published worldwide in the scientific literature. More precisely, EcoBase is an information repository of EwE models freely accessible online here or via the free EwE software - version 6.5.
Who manages EcoBase?
EcoBase was created in 2015 by a group of scientists interested in conducting global meta-analyses based on existing EwE models . Since 2014, EcoBase is managed and supported by the members of the Model repository working group of the Ecopath Research and Development Consortium (ERDC) . The ERDC is a global, cooperative network focused on the research, development and sustainability of the EwE approach and software, its information basis, and complementary activities and capabilities.
EcoBase was created with the intention of making EwE models discoverable, accessible, and reusable to the scientific community, as soon as they are published. Only the Ecopath models are freely accessible at this stage (Ecosim and Ecospace parameters are not available). The main goals of EcoBase are to:
You may use EcoBase by following these 5 simple steps:
If you are willing to share an EwE model you recently developed and published, please use the EcoBase export plug-in available in the new version of the EwE software (v6.5). If you encounter any problem, please contact the EcoBase administrator at jerome.guitton@agrocampus-ouest.fr so that your model may be added to the more than 500 models currently referenced in EcoBase.
#To get the list of available Ewe models library(RCurl) library(XML) library(plyr) library(dplyr) #To obtain the list of available model h=basicTextGatherer() curlPerform(url = 'http://sirs.agrocampus-ouest.fr/EcoBase/php/webser/soap-client_3.php',writefunction=h$update) data<-xmlTreeParse(h$value(),useInternalNodes=TRUE) liste_mod<-ldply(xmlToList(data),data.frame)%>% filter(model.dissemination_allow =='true') #liste_mod contains a list and decription of available models in EcoBase
#To get the input values for model mymodel - 403 library(RCurl) library(XML) library(plyr) h=basicTextGatherer() mymodel<-403 curlPerform(url = paste('http://sirs.agrocampus-ouest.fr/EcoBase/php/webser/soap-client.php?no_model=',mymodel,sep=''),writefunction=h$update,verbose=TRUE) data<-xmlTreeParse(h$value(),useInternalNodes=TRUE) input1<-xpathSApply(data,'//group',function(x) xmlToList(x))
#To get the ouptput values for model mymodel - 403 library(RCurl) library(XML) library(plyr) #To Obtain a model - output h=basicTextGatherer() mymodel<-403 curlPerform(url = paste('http://sirs.agrocampus-ouest.fr/EcoBase/php/webser/soap-client_output.php?no_model=',mymodel,sep=''),writefunction=h$update,verbose=TRUE) data<-xmlTreeParse(h$value(),useInternalNodes=TRUE) output1<-xpathSApply(data,'//group',function(x) xmlToList(x))
|