#' Dataframe Addrow
#'
#' Function to Simplify adding a row to a dataframe and updating the rownames.
#' @export
df.addrow <- function(datafr, newrow, rowname) {
temprows <- rownames(datafr)
datafr <- rbind(datafr,newrow)
rownames(datafr) <- c(temprows,rowname)
return(datafr)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.