ask(message="Type in datum")
message
n <- ask("sample size") nv <- ask("vector of sample sizes") # in the second case, the user could reply eg with `c(5,10,30)'