"landscape.read" <-
function(fn = "filename")
{
if (file.exists(fn))
{
.Call("read_landscape",fn,PACKAGE = "kernelPop2")
}
else
{
print (paste("Filename: ",fn,"does not appear to exist"))
NULL
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.