NVIpkg <- params$NVIpkg NVIpkg_inline <- paste0("`", NVIpkg, "`") pkg_path <- params$pkg_path logo_path <- "" if (file.exists(paste0("./man/figures/", NVIpkg, "_logo.png"))) { logo_path <- paste0(' <img src="man/figures/', NVIpkg, '_logo.png" align="right" height="138" />') } knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
r paste0(NVIpkg, ": ", desc::desc_get_field(key = "Title"), logo_path)
description <- desc::desc_get_field(key = "Description")
r paste0(NVIpkg_inline,
"",
sub(substr(description,1,1), tolower(substr(description,1,1)), description))
r paste0(NVIpkg_inline,
"",
sub(substr(description,1,1), tolower(substr(description,1,1)), description))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.