#install.packages("devtools")
#library("devtools")
getMax <- function(datad, columnName)
{
max(datad[,columnName])
}
getMin <- function(datad, columnName)
{
min(datad[,columnName])
}
getMean <- function(datad, columnName)
{
mean(datad[,columnName])
}
#library("summaryFunc")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.