search for: tclvarcount

...ded via a namespace (and not attached): [1] Biostrings_2.34.1 DBI_0.3.1 RSQLite_1.0.0 splines_3.1.2 XVector_0.6.0 zlibbioc_1.12.0 I think the relevant code that is resulting in the error is generated by this function in main.R: tclArrayVar <- function(){ Try(n <- evalq(TclVarCount <- TclVarCount + 1, .TkRoot$env)) Try(name <- paste("::RTcl", n,sep = "")) Try(l <- list(env = new.env())) Try(assign(name, NULL, envir = l$env)) Try(reg.finalizer(l$env, function(env) tcl("unset", ls(env)))) Try(class(l) <- "t...

Thanks Peter and Dan for your replies. After learning a bit more about tcltk and environments etc. I have replaced Try(n <- evalq(TclVarCount <- TclVarCount + 1, .TkRoot$env)) with Try(n <- .TkRoot$env$TclVarCount <- .TkRoot$env$TclVarCount +1L) as you suggest. It now works for both R-3.1.1 and R-3.1.2+ (My understanding is that the Try function is there to put a GUI box around the error messages.) I shall update affylmG...

...lobalEnv> as a result, this won't work any more because R_EmptyEnv has no operators and functions in it: > evalq(x <- 1, .TkRoot$env) Error in eval(substitute(expr), envir, enclos) : could not find function "<-" and consequently, you conk out at Try(n <- 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)...