Provides two functions.
yesno(), asks a custom yes-no question with three variable
The order and phrasing of the possible responses varies randomly to ensure the user consciously chooses (as opposed to automatically types their response).
yesno2(), ask a yes-no question with two custom responses.
yesno("Do you like ", R.Version()$nickname ,"?") Do you like Bug in Your Hair? 1: Definitely 2: No way 3: No Selection: 1  TRUE yesno("Do you like ", R.Version()$nickname ,"?") Do you like Bug in Your Hair? 1: No way 2: Uhhhh... Maybe? 3: I agree Selection: 2  FALSE > yesno2("Do you like this question?", yes = "I really do") Do you like this question? 1: I really do 2: No Selection: 1  TRUE
To install the latest release version from CRAN
To install the latest development version from the Poisson drat repository
if(!"drat" %in% installed.packages()[,1]) install.packages("drat") drat::addRepo("poissonconsulting") install.packages("yesno")
To install the latest development version from GitHub
if(!"devtools" %in% installed.packages()[,1]) install.packages("devtools") devtools::install_github("poissonconsulting/yesno")
Please report any issues.
Pull requests are always welcome.
Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.
yesno()function is based on the internal function with the same name from devtools (modified to return TRUE if the user answers yes).