Displaying 1 result from an estimated 1 matches for "logcommands".
Did you mean:
docommands
2003 Nov 03
0
problem with fix() called from Rcmdr
...ataSet)
tkwm.deiconify(.commander)
tkfocus(.commander)
}
where .activeDataSet is a (global) character variable containing the name
of the "active" data frame, logger() just echoes the command to the R console
logger <- function(command){
if (tclvalue(.logCommands) == "1") {
tkinsert(.log, "end", paste(command,"\n", sep=""))
tkyview.moveto(.log, 1)
}
lines <- strsplit(command, "\n")[[1]]
for (line in lines) cat(paste("\nR-cmdr>", line, "\n"))...