##---- Should be DIRECTLY executable !! ----##-- ==> Define data, use random,##-- or do help(data=index) for the standard data sets.## The function is currently defined asfunction (bdy,res){print(sprintf("There was an error: %s",bdy$message))return(bdy)}