#' @export
sim <- function(x) useMethod("sim")