Hello, I have the TCl/Tk command "tkmessageBox(titel="",message="x",icon="question",type="okcancel")" in my R script. Now I want to perform some operation in relation to the user's choice, something like "if (okpressed) xxx else yyy" What values does this command give and how are they used? Thank you, Richard -- Richard M?ller - Am Spring 9 - D-58802 Balve-Eisborn www.oeko-sorpe.de
> res <- tkmessageBox(title = "test",message = "Continue?",+ icon ="question", type = "okcancel") > if (tclvalue(res) == "ok") 1 else 2 Happy new year! Philippe Grosjean Richard M?ller wrote:> Hello, > I have the TCl/Tk command > "tkmessageBox(titel="",message="x",icon="question",type="okcancel")" in my R > script. Now I want to perform some operation in relation to the user's > choice, something like > "if (okpressed) xxx else yyy" > What values does this command give and how are they used? > Thank you, Richard
Is it so hard to find out? Your tcl documentation will tell you what tk_messageBox returns, and as it is tcl string, you need to call tclvalue() on the value of tkmessageBox() to get an R character vector. On Fri, 28 Dec 2007, Richard M?ller wrote:> Hello, > I have the TCl/Tk command > "tkmessageBox(titel="",message="x",icon="question",type="okcancel")" in my R > script. Now I want to perform some operation in relation to the user's > choice, something like > "if (okpressed) xxx else yyy" > What values does this command give and how are they used? > Thank you, Richard >-- Brian D. Ripley, ripley at stats.ox.ac.uk Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/ University of Oxford, Tel: +44 1865 272861 (self) 1 South Parks Road, +44 1865 272866 (PA) Oxford OX1 3TG, UK Fax: +44 1865 272595
Richard M?ller wrote:> > I have the TCl/Tk command > "tkmessageBox(titel="",message="x",icon="question",type="okcancel")" > in my R script. Now I want to perform some operation in relation to > the user's choice, something like "if (okpressed) xxx else yyy" What > values does this command give and how are they used? >Why don't you test it yourself? library(tcltk) x <- tkmessageBox(title="",message="x",icon="question",type="okcancel") # press x or cancel x # <Tcl> ok or <Tcl> cancel To get back from this Tcl-thing to an R-string, use y <- tclvalue(x) Alberto Monteiro
This webpage has been very helpful for me: http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/ -Samu Richard M?ller kirjoitti:> Hello, > I have the TCl/Tk command > "tkmessageBox(titel="",message="x",icon="question",type="okcancel")" in my R > script. Now I want to perform some operation in relation to the user's > choice, something like > "if (okpressed) xxx else yyy" > What values does this command give and how are they used? > Thank you, Richard-- ------------------------------------------ Samu M?ntyniemi Researcher Fisheries and Environmental Management Group (FEM) Department of Biological and Environmental Sciences Biocenter 3, room 4414 Viikinkaari 1 P.O. Box 65 FIN-00014 University of Helsinki Phone: +358 9 191 58710 Fax: +358 9 191 58257 email: samu.mantyniemi at helsinki.fi personal webpage: http://www.helsinki.fi/people/samu.mantyniemi/ FEM webpage: http://www.helsinki.fi/science/fem/