##/////////////////////////////////////////////////////////////////////////////
##//zzz.R
##/////////////////////////////////////////////////////////////////////////////
##
##=============================================================================
## author: Michael Dietze
##=============================================================================
##==============================================================================
# .onAttach <- function(libname, pkgname){
#
# ## show startup message
# try(packageStartupMessage(paste0("\n",
# "EMMAgeo v. 0.9.8. When using this package please cite: ", "\n", "\n",
# "Dietze, E., and Dietze, M.: Grain-size distribution unmixing using the ",
# "R package EMMAgeo, E&G Quaternary Sci. J., 68, 29-46, https://doi.org/",
# "10.5194/egqsj-68-29-2019, 2019", "\n", "\n",
# "Dietze E, Hartmann K, Diekmann B, IJmker J, Lehmkuhl F, Opitz S, Stauch ",
# "G, Wuennemann B, Borchers A. 2012. An end-member algorithm for ",
# "deciphering modern detrital processes from lake sediments of ",
# "Lake Donggi Cona, NE Tibetan Plateau, China. Sedimentary Geology ",
# "243-244: 169-180.", "\n", "\n",
# "(Don't forget to mention the package and R version.)")),
# silent = TRUE)
# }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.