Displaying 4 results from an estimated 4 matches for "rtcl".
Did you mean:
btcl
2015 Jan 14
2
Is the tcltk failure in affylmGUI related to R bug 15957
...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=
"...
2010 Aug 12
2
accessing tcl variables within R and tcl
...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...
2015 Jan 14
0
Is the tcltk failure in affylmGUI related to R bug 15957
...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...
2015 Jan 18
1
Is the tcltk failure in affylmGUI related to R bug 15957
...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...