userinput(fct, info=NULL, prompt, n, type="n", pch=par()$pch,
cex=par()$cex, ...)n of type of fct="readline" then a character vector of length one is
returned. If fct="locator" then the function returns a
list containing 'x' and 'y' components which are the coordinates
of the identified points in the user coordinate system, i.e., the
one specified by 'par("usr")'.
action set by