#####################
# Getting version
#####################
version = read.dcf("DESCRIPTION")[, "Version"]
# header
top = readLines("osler_top.R")
# oslerLite definition
content = readLines("R/osler_install.R")
content = paste0("\t", content)
vc = readLines("R/make_full_version.R")
vc = paste0("\t", vc)
content = c(content, vc)
# adding version to the head and the printout
version = paste0("# oslerInstall package version: ", version)
version = c(version, paste0("pkg_ver = '", version, "'"))
out = c(version, top, content)
# adding osler_package tables so that things work
content = readLines("R/osler_package_table.R")
content = paste0("\t", content)
out = c(out, "", content)
# adding bottom of if statement
bot = readLines("osler_bottom.R")
out = c(out, bot)
writeLines(text = out, con = "oslerLite.R")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.