fpath <- file.path('..', 'orig', 'Bintanja')
currwd <- getwd()
setwd(fpath)
bintanja05 <- read.delim("bintanja2005.txt",skip=101,header=T,sep="",na.strings="")
setwd(currwd)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.