.onAttach <- function(libname, pkgname){
packageStartupMessage("Welcome to the DeepBlueR package")
if(RCurl::url.exists("http://deepblue.mpi-inf.mpg.de")){
packageStartupMessage("DeepBlue is online")
}else{
warning("DeepBlue could not be reached. Check network connectivity.")
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.