## Insert a line to a HTML file
## Change the path/name of the file to redirect to your test file
myfile <- paste(tempfile(),".html",sep="")
HTMLhr(file=myfile)
cat("\n Test output written in: ",myfile)
Run the code above in your browser using DataLab