library(GeMS)
Cur.dir<-system.file("extdata/Cod_2_Selectivity",package="GeMS")
OMNames<-c("Cod_Selectivity_CTL")
run_GeMS(CTLNameList=OMNames,
MSEdir=Cur.dir)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.