PTdialog.rpartq {pinktoe} | R Documentation |
Opens a Tcl/Tk GUI widget with some text, a two-button radio button and decision text and submit/reset buttons. Once submit is pressed the state of the radiobutton is returned.
PTdialog.rpartq(questiontext, qopts = NULL, qno = NULL, explaintext = NULL)
questiontext |
Character string containing question relating to radiobutton |
qopts |
Character string containing text describing one option of the radiobutton |
qno |
Character string containing text describing the other option of the radiobutton. |
explaintext |
Character string containing (extended) text presented before the radiobutton |
A simple Tcl/Tk widget display function that permits some text to be displayed, a question to be displayed and two answers with two sets of text strings containing the answer text.
Returns the qopts or qno string (indicating the answer) if these are not NULL. Otherwise returns "yes" or "no".
Not intended for general user use
Guy P Nason
http://www.stats.bris.ac.uk/~magpn/Research/Pinktoe/pinktoe.htm
library("tcltk") ## Not run: PTdialog.rpartq("Is it possible for a swallow to carry a coconut?", qopts="Yes, certainly", qno="No way", explaintext="A question from Monty Python's Holy Grail") ## End(Not run)