library(XML)
z = xmlTree()
z$addNode("r:data", namespace = c(r = "http://www.r-project.org", omg = "http://www.omegahat.org"), close = FALSE)
x = rnorm(3)
z$addNode("r:numeric", attrs = c("omg:length" = length(x)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.