search for: tkget

...mmand=function(...)tkyview(levels.list2,...)) tkgrid(levels.list2,levels.list2.scroll) vec<-c("a","b",""," "," ") tkdelete(levels.list2,"0","end") for (var in vec) {tkinsert(levels.list2, "end", var)} tclvalue(tkget(levels.list2,"0"))# a tclvalue(tkget(levels.list2,"1"))# b tclvalue(tkget(levels.list2,"2"))# "" tclvalue(tkget(levels.list2,"3"))# " " it's ok tclvalue(tkget(levels.list2,"4"))# " " it's ok library(Rcmdr)...

...t;,var2) But in my text window I have : x=2a=mean(c(1,2,3)) I d'like to have something like: x=2 a=mean(c(1,2,3)) 2)My second problem, I use the run function that i have found in R TCLTK example Evaluating R Code From A Text Window in R TclTk: run <- function() { code <- tclvalue(tkget(txt,"0.0","end")) e <- try(parse(text=code)) if (inherits(e, "try-error")) { tkmessageBox(message="Syntax error", icon="error") return() } cat("Executing from script window:", "-----",...

...ss: ****************************************************** > library(tcltk) > tt <- tktoplevel() > tkpack(txt.w <- tktext(tt)) <Tcl> > tkinsert(txt.w, "0.0", "plot(1:10)") <Tcl> > > eval.txt <- function() + eval(parse(text=tclvalue(tkget(txt.w, "0.0", "end")))) > tkpack(but.w <- tkbutton(tt,text="Submit", command=eval.txt)) <Tcl> > > tkdestroy(tt) ****************************************************** An interactive session ran successfully. One failure: ***************************...

...tWindow(), "end", "\n testing \n") <Tcl> But writing to the message window, though it produced no error, also had no visible effect: > tkinsert(MessagesWindow(), "end", "\n testing \n") <Tcl> Checking the contents of the Messages window via tkget(MessagesWindow(), "1.0", "end") revealed, however, that the text should have been there. Suspecting a timing/event-loop-synchronization issue, I inserted a delay into the function that sends text to the Messages window; here's a simplified version of that function: Message...

Hello!! I would like create a window that has diferent element as: http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/checkboxes.html http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/radiobuttons.html I know as make it, but I don?t know as I could (align the diferent elemnts to left, right, top, bottom) or (put in a coordinates into windows). If anybody know as I could make it, I would

Hello R and tcltk users... I'm running into difficulties applying the tkmenubutton() and tklistbox() functions, found in the tcltk package, to a simple gui. My search for R code which utilizes these two functions has come up empty. Currently, I am attempting to translate pure "Tcl/Tk" code to R with little to no success. So far, the most helpful tool for learning the tcltk R

...) sas.listbox<-tklistbox(anzeigeframe,exportselection="0") sas.yscroll<-tkscrollbar(anzeigeframe) tkconfigure(sas.listbox,yscrollcommand=paste(.Tk.ID(sas.yscroll),"set")) tkconfigure(sas.yscroll,command=paste(.Tk.ID(sas.listbox),"yview")) selection<- tkget(prot.listbox,tkcurselection(prot.listbox)) s1 <- substr(selection,1,4) s2 <- substr(selection,6,6) ... doing something i<-1 while (i <= length(resultset[,1])) { tkinsert(protas.listbox,'end',paste(resultset[i,1],resultset[i,...

...efault graphics device in the GNOME interface was gtk, which is no longer in the base package. It is now X11. o The print button on the toolbar of the GNOME graphics device did not work. o The example code on the man page for TkWidgetcmds had not been updated after the change that made tkget (et al.) return tclObj objects, so the "Submit" button didn't work. o Rd conversion to latex did not add a new line before \end{Section} for the section environments, which caused problems if the last thing in a section was \preformatted{} (and potentially elsewhere). o...

...efault graphics device in the GNOME interface was gtk, which is no longer in the base package. It is now X11. o The print button on the toolbar of the GNOME graphics device did not work. o The example code on the man page for TkWidgetcmds had not been updated after the change that made tkget (et al.) return tclObj objects, so the "Submit" button didn't work. o Rd conversion to latex did not add a new line before \end{Section} for the section environments, which caused problems if the last thing in a section was \preformatted{} (and potentially elsewhere). o...