sink and history with a
couple of extra bells and whistles.txtStart(file, commands=TRUE, results=TRUE, append=FALSE, cmdfile,
visible.only=TRUE)
txtOut()
txtStop()
txtComment(txt,cmdtxt)
txtSkip(expr)file or replace itsourced or copied and pasted fromfilecmdfilefile or cmdfiletxtSkip returns the value of expr.results is TRUE and commands is FALSE then the result
is similar to the results of sink. If commands
is true as well then the results will show both the commands
and results similar to the output on the screen. If both
commands and results are FALSE then pretty much
the only thing these functions will accomplish is to waste some
computing time.
If cmdfile is
specified then an additional file is created with the commands
used (similar to the history command), this file can be
used with source or copied and
pasted to the terminal.
The Start function specifies the file/directory to create and
starts the transcript,
The prompts are changed to remind you
that the commands/results are being copied to the transcript.
The Stop function stops the recording and resets the prompts.
The txtOut function is a short cut for the txtStart command that uses the current date and time in the filenames for the transcript and command files. This function is not part of the TeachingDemos package.
The R parser strips comments and does some reformating so the
transcript file may not match exactly with the terminal
output. Use the txtComment functions to add a comment. This will show up as a line offset
by whitespace in the transcript file.
If cmdtxt is specified then that line
will be inserted into cmdfile preceeded by a # so it
will be skipped if sourced or copied.
The txtSkip function will run the
code in expr but will not include the commands or
results in the transcript file (this can be used for side
computations, or requests for help, etc.).sink, history,
Sweave, the odfWeave package, the R2HTML package, the
R2wd packagetxtStart()
txtComment('This is todays transcript')
date()
x <- rnorm(25)
summary(x)
stem(x)
txtSkip(?hist)
hist(x)
Sys.Date()
Sys.time()Run the code above in your browser using DataLab