Displaying 1 result from an estimated 1 matches for "toreturn".
Did you mean:
noreturn
2010 Oct 05
0
Please help me simplify my manipulation and printing of function calls
...the messy calculation I do)
if (length(TheCallList)>1)
{
for (iarg in seq(2, length(TheCallList)))
{
TheCallList[[iarg]]<-eval(TheCallList[[iarg]])
}
}
# make it back into a call
TheCall<-as.call(TheCallList)
# and finally call it
ToReturn<-eval(TheCall)
# and the purpose of the whole shebang is to be able to record the
# raw graphics call for posterity
if (DoOnyxEcho==TRUE) capture.output(TheCall, file=OnyxEchoFile, append=TRUE)
# mimic the return from segments (NULL in this case, but not generally)
invisible...