R/TrueFalse.R

Defines functions GIFTTF

Documented in GIFTTF

GIFTTF<-function(qtxt, ans)
{
	if(!is.logical(ans))
		stop("Answer is not logical.")

        cat("\n",qtxt, "{", as.character(ans), "}\n", sep="")
}

Try the RGIFT package in your browser

Any scripts or data that you put into this service are public.

RGIFT documentation built on May 29, 2017, 2:51 p.m.