desc.freq <-
function(calc,names.arouca1=names.arouca1, r=r){
calc = round(calc, r)
paste(
"<div style=\"text-align: left\">",
names.arouca1,":", calc,
"</div>"
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.