add.dimnames2db <- function(x, cn=colnames(x), rn=rownames(x)) {
x <- as.data.frame(x)
colnames(x) <- cn
rownames(x) <- rn
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.