library(XML)
doc = xmlParse("~/Austria-Map-withFonts.ps.xml")
nd = getNodeSet(doc, "//text[12]")[[1]]
xmlAttrs(nd)["string"]
str = getNodeSet(doc, "//text[12]/@string")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.