[R] Return Value of TCl/Tk window in R

[Richard Müller]

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

______________________________________________
R-h...@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

[Prof Brian Ripley]

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, rip...@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

[Alberto Monteiro]

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

[Samu Mäntyniemi]

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.ma...@helsinki.fi
personal webpage: http://www.helsinki.fi/people/samu.mantyniemi/
FEM webpage: http://www.helsinki.fi/science/fem/

[Philippe Grosjean]

> 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

______________________________________________