[R] Running tcltk From a batch file

[Peter Dalgaard]

Jonne Zutt wrote:
> Hi Samuel,
>
> An easy solution is the following. Let the R script wait until a certain
> variable (ok_to_quit) got changed.
>
> Hope it helps,
> Jonne.
>
> ## in a file called test.R
> quit <- function() {
>   .Tcl("set ok_to_quit 1")
>   tkdestroy(tt)
> }
>
> require(tcltk)
> tt <<- tktoplevel()
> OK.but <- tkbutton(tt,text="OK",command=quit)
> tkgrid(OK.but)
> tkfocus(tt)
>
> .Tcl("set ok_to_quit 0")
> .Tcl("vwait ok_to_quit")
>
>   
The tkttest demo does this in a somewhat cleaner fashion (avoiding .Tcl).

-- 
   O__  ---- Peter Dalgaard             Øster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)                  FAX: (+45) 35327907