##' A slightly more convenient version of packageDescription()
##' 1. returns named character vector; no other attributes
pkgDesc <- function (pkg, lib.loc = NULL, fields = NULL, ...) {
pd <- packageDescription(pkg, lib.loc=lib.loc, fields=fields, drop=FALSE, ...)
file <- attr(pd, "file")
struct(class = "Dlist", c(unlist(pd), c(file=file)))
}
##' useful: e.g. as sapply( pkgs, pkgBuilt)
pkgBuilt <- function(pkg, lib.loc = NULL, ...) pkgDesc(pkg, lib.loc=lib.loc, fields = "Built", ...)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.