Responsive Retina-Friendly Menu

script to play with EcoBase


#To get the list of available Ewe models

library(RCurl)
library(XML)
library(plyr)



#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)
        
#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))
        

Publications about EcoBase and associated supplementary material



  • You will be able to find here the datasets used in the article "Global overview of the applications of the Ecopath with Ecosim modeling approach using the EcoBase model repository" submitted for publication in Ecological Modelling: