.onAttach <- function(libname, pkgname)
{ if(!("breedR" %in% loadedNamespaces()))
{ breedR.loaded <- requireNamespace("breedR", quietly=TRUE)
if (!breedR.loaded)
{ packageStartupMessage("breedR needs to be loaded if the mixed-model functions are to be used.
breedR is available from Github. Please visit https://github.com/famuvie/breedR.\n")}
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.