"landscape.new.empty" <-
function()
{
tmpdemo <- list(localdem=NULL,epochs=NULL)
rland <- list(intparam=NULL,switchparam=NULL,floatparam=NULL,demography=tmpdemo,loci=NULL,expression=NULL,gpmap=NULL,individuals=NULL)
rland
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.