How do you sink input and output to a text file in R?

Question

How do you sink both the console input and the console output to a text file? Take the following code:

sink(\"temp.txt\")
1:10
sink()

It wi

Answer 1

library(TeachingDemos)

txtStart("temp.txt")
1:10
txtStop()

The text file now looks like

> 1:10
 [1]  1  2  3  4  5  6  7  8  9 10