###################################################################
# cjgb
# 20120305
# Function intended for testing metadata files
###################################################################
test.metadata <- function(file, md.1, md.2, encoding = "UTF-8"){
read.fwf.microdata(file, md.1, md.2, fileEncoding = encoding)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.