search for: rtcl

...le in a Tk window using the "RNA Targets" option from the "RNA Targets" Menu item and the following errors occur: Error text box 1: Error in eval(substitute(expr),enclos):could not find function "<-" - pressed OK Following error text box: Error in paste("::RTcl",n,sep=""): object 'n' not found - pressed OK Following error text box: Error in assign(name, NULL, environ = I$env): object 'name' not found - pressed OK Following error text box: Error in paste("set",name, "(0,0)\"\"",sep= "...

...gt; a <- tclVar("") > tclObj(a) <- as.tclObj(letters[1:5]) > tcl('set',a) # output list However > tcl('test',a) # does not work as expected, returns the variable name Why not? In fact, how do get the name of the "a" list in tcl (something like RTcl...) so I could use it as follows > .Tcl('test $RTcl1') #works Loops are much quicker in tcl than in R, hence I try to do some computations in tcl and not via wrapper function in R. I therefore need a way to easily access tcl variables from within R and tcl. Thanks for any help, Adrian...

...evalq(TclVarCount <- TclVarCount + 1, .TkRoot$env)) which presumably needs to be recoded in the same way as the current code in tclVar(): > tclVar function (init = "") { n <- .TkRoot$env$TclVarCount <- .TkRoot$env$TclVarCount + 1L name <- paste0("::RTcl", n) l <- list(env = new.env()) assign(name, NULL, envir = l$env) reg.finalizer(l$env, function(env) tcl("unset", ls(env))) class(l) <- "tclVar" tclvalue(l) <- init l } (The whole thing looks a bit odd: Your function clones a fair bit of tc...

...Root$env)) > > which presumably needs to be recoded in the same way as the current code in tclVar(): > > > tclVar > function (init = "") > { > n <- .TkRoot$env$TclVarCount <- .TkRoot$env$TclVarCount + > 1L > name <- paste0("::RTcl", n) > l <- list(env = new.env()) > assign(name, NULL, envir = l$env) > reg.finalizer(l$env, function(env) tcl("unset", ls(env))) > class(l) <- "tclVar" > tclvalue(l) <- init > l > } > > (The whole thing looks a b...