fixURLs = function(mdfile){
f1 = file(mdfile)
lines = readLines(f1, n = -1)
modlines = gsub("(www.", "(http://www.", lines, fixed = TRUE)
writeLines(modlines, f1)
close(f1)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.