search for: tclarray

...64-unknown-linux-gnu- library/2.15/TIMP/libs ** R ** data ** inst ** preparing package for lazy loading Warning: S3 methods ?$.tclvar?, ?$<-.tclvar?, ?as.character.tclObj?, ?as.character.tclVar?, ?as.double.tclObj?, ?as.integer.tclObj?, ?as.logical.tclObj?, ?as.raw.tclObj?, ?print.tclObj?, ?[[.tclArray?, ?[[<-.tclArray?, ?$.tclArray?, ?$<-.tclArray?, ?names.tclArray?, ?names<-.tclArray?, ?length.tclArray?, ?length<-.tclArray?, ?tclObj.tclVar?, ?tclObj<-.tclVar?, ?tclvalue.default?, ?tclvalue.tclObj?, ?tclvalue.tclVar?, ?tclvalue<-.default?, ?tclvalue<-.tclVar?, ?close.tkP...

...y unpacked and MD5 sums checked ** R ** demo ** inst ** byte-compile and prepare package for lazy loading Warning: S3 methods ?$.tclvar?, ?$<-.tclvar?, ?as.character.tclObj?, ?as.character.tclVar?, ?as.double.tclObj?, ?as.integer.tclObj?, ?as.logical.tclObj?, ?as.raw.tclObj?, ?print.tclObj?, ?[[.tclArray?, ?[[<-.tclArray?, ?$.tclArray?, ?$<-.tclArray?, ?names.tclArray?, ?names<-.tclArray?, ?length.tclArray?, ?length<-.tclArray?, ?tclObj.tclVar?, ?tclObj<-.tclVar?, ?tclvalue.default?, ?tclvalue.tclObj?, ?tclvalue.tclVar?, ?tclvalue<-.default?, ?tclvalue<-.tclVar?, ?close.tkProgr...

I would like to use a tclArray: mytkarray <- tclArray() as the variable for a table: table1 <- tkwidget(f1, 'table', variable= mytkarray) but if I include character strings with embedded spaces, I get braces appearing in the table. I can remove them using a non-R tclarray, (the difference between the first exa...

Hi I've a problem with the following example: library(tcltk) .Tcl("array unset tclArray") myRarray <- matrix(1:1000, ncol=20) for (i in (0:49)) for (j in (0:19)) .Tcl(paste("set tclArray(",i,",",j,") ",myRarray[i+1,j+1],sep="")) tt<-tktoplevel() table1 <- tkwidget(tt,"table",variable="tclArray",...

....tkwin, tclfile.dir, tclfile.tail In addition: Warning message: S3 methods '$.tclvar', '$<-.tclvar', 'as.character.tclObj', 'as.character.tclVar', 'as.double.tclObj', 'as.integer.tclObj', 'as.logical.tclObj', 'print.tclObj', '[[.tclArray', '[[<-.tclArray', '$.tclArray', '$<-.tclArray', 'names.tclArray', 'names<-.tclArray', 'length.tclArray', 'length<-.tclArray', 'tclObj.tclVar', 'tclObj<-.tclVar', 'tclvalue.default', 'tclvalue.tcl...

...: fun(libname, pkgname) error: Tcl/Tk support is not available on this system Además: Mensajes de aviso perdidos S3 methods ?$.tclvar?, ?$<-.tclvar?, ?as.character.tclObj?, ?as.character.tclVar?, ?as.double.tclObj?, ?as.integer.tclObj?, ?as.logical.tclObj?, ?as.raw.tclObj?, ?print.tclObj?, ?[[.tclArray?, ?[[<-.tclArray?, ?$.tclArray?, ?$<-.tclArray?, ?names.tclArray?, ?names<-.tclArray?, ?length.tclArray?, ?length<-.tclArray?, ?tclObj.tclVar?, ?tclObj<-.tclVar?, ?tclvalue.default?, ?tclvalue.tclObj?, ?tclvalue.tclVar?, ?tclvalue<-.default?, ?tclvalue<-.tclVar?, ?close.tk...

Full_Name: Neil McKay Version: 1.8.0 OS: Linux (RedHat 7.1) Submission from: (NULL) (129.124.42.210) I get a core dump when executing the following code: > library("tcltk") > zzz<-tclArray() > tclvalue(zzz) Running under gdb gives this output: Program received signal SIGSEGV, Segmentation fault. makeRTclObject (tclobj=0x0) at tcltk.c:48 48 Tcl_IncrRefCount(tclobj);

...cr<-colorRampPalette(c(b.color,e.color),space="Lab",interpolate="spline") ##rmpcol <- hex(mixcolor(alpha,bc,ec,where="LUV")) rmpcol <- cr(n.col) inc <- 300/n.col xl <- 0 #barlst <- vector(length=n.col,mode="list") barlst <- tclArray() for(i in 1:n.col){ item<-tkcreate(canvas.r,"rect",xl,0,xl+inc,50, fill=rmpcol[i],outline=rmpcol[i]) ##tkaddtag(canvas.r, "point", "withtag", item) barlst[[i]]<-item xl <- xl+inc } tkgrab.set(tt) tkwait.window(tt)...

On Wed, 30 Jul 2003 TSudler at ch.imshealth.com wrote: <SNIP> table1 <- tkwidget(tt,"table",variable="tclArray", rows=as.character(dim(datifram)[1]+1), cols=as.character(dim(datifram)[2]),titlerows="1", titlecols="3",selectmode="extended",height="27", width="13",bg="white",state="disabled",cursor="arrow", drawmode="sin...

Has anyone written a matrix editor or data.entry() replacement using the Tk table widget? I've been playing around with the examples at http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/tktable.html and making some progress, but I'd rather not spend much time on this if someone else has already done it. Jeff

...hould come in handy for people playing with things like the tkTable extension. Basically these work like tclVar objects but can be subscripted (notice that these beasts are associative - like a Perl hash - rather than objects of set dimensions). Basic usage goes like this: > x <- tclArray() # create array object > x[[2]]<-123 > x[[2]] <Tcl> 123 > x[["2"]] # the index is really a string <Tcl> 123 > x[[1,2]]<-"abc" > x[["1,2"]] # multiple indices are pasted together <Tcl> abc > x[[1,2]] <Tcl> abc > x[[&...

...(3) Zugeh?rigkeit is a matrix. #The values can be changed by a tkentry-element. handler.Berechnung<-function() { tkconfigure(Ergebnisfenster, textvariable=tclVar(test2(as.numeric(tclObj(VKG)),as.numeric(tclObj(HZ)) ,as.numeric(tclObj(VZ)),as.numeric(tclObj(Aktivit?t)),as.numeric(tclObj( tclArray1))))) } test2 <- local({source("C:/Berechnung_Funktion.R", local = TRUE) environment(Berechnung) <- .GlobalEnv Berechnung }) and: Button<-tkframe(InputOutputfenster) tkpack(Button, side='top') tkpack(tkbutton(Button, text='compute optimal solution',command=handl...

...se_2.26.0 [16] BiocGenerics_0.12.1 limma_3.22.3 loaded 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(&quot...

...;, ls(env))) class(l) <- "tclVar" tclvalue(l) <- init l } (The whole thing looks a bit odd: Your function clones a fair bit of tclVar, wrapping each line in Try() for no apparent reason (or?), with the apparent purpose of doing something that seems quite similar to what tclArray() already does...) -pd > On 14 Jan 2015, at 06:50 , Keith Satterley <keith at wehi.edu.au> wrote: > > I maintain the package affylmGUI. It works when installed on many previous versions of R. I have today tested exactly the same code under R-2.15.3, R-3.0.2, R-3.1.0, R-3.1.1, R-3...

...<- "tclVar" > tclvalue(l) <- init > l > } > > (The whole thing looks a bit odd: Your function clones a fair bit of tclVar, wrapping each line in Try() for no apparent reason (or?), with the apparent purpose of doing something that seems quite similar to what tclArray() already does...) > > -pd > > > > On 14 Jan 2015, at 06:50 , Keith Satterley <keith at wehi.edu.au> wrote: > > > > I maintain the package affylmGUI. It works when installed on many previous versions of R. I have today tested exactly the same code under R-2.1...