grepEurostatTOC <-
function(pattern) {
setEurostatTOC()
tmp <- get(".eurostatTOC", envir = .SmarterPolandEnv)
tmp <- tmp[tmp[,3]=="dataset",]
tmp[grep(as.character(tmp[,1]), pattern=pattern),]
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.