Error in re-building vignettes:
  ...
Loading required package: MASS
Loading required package: Matrix
Loading required package: mvtnorm
Loading required package: sandwich
mediation: Causal Mediation Analysis
Version: 4.4.5

Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 0.00382659 (tol = 0.001, component 1)
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 0.0146734 (tol = 0.001, component 1)

 *** caught segfault ***
address 38e229fe, cause 'memory not mapped'

Traceback:
 1: apply(matrix(et1[group.id.y == unique(group.id.y)[g], ], ncol = sims),     2, weighted.mean, w = weights[group.id.y == unique(group.id.y)[g]])
 2: t(apply(matrix(et1[group.id.y == unique(group.id.y)[g], ], ncol = sims),     2, weighted.mean, w = weights[group.id.y == unique(group.id.y)[g]]))
 3: mediate(med.fit, out.fit, treat = "free", mediator = "smorale",     control.value = 3, treat.value = 4, sims = 100)
 4: eval(expr, envir, enclos)
 5: eval(expr, .GlobalEnv)
 6: withVisible(eval(expr, .GlobalEnv))
 7: doTryCatch(return(expr), name, parentenv, handler)
 8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
 9: tryCatchList(expr, classes, parentenv, handlers)
10: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if (!is.null(call)) {        if (identical(call[[1L]], quote(doTryCatch)))             call <- sys.call(-4L)        dcall <- deparse(call)[1L]        prefix <- paste("Error in", dcall, ": ")        LONG <- 75L        msg <- conditionMessage(e)        sm <- strsplit(msg, "\n")[[1L]]        w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w")        if (is.na(w))             w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L],                 type = "b")        if (w > LONG)             prefix <- paste0(prefix, "\n  ")    }    else prefix <- "Error : "    msg <- paste0(prefix, conditionMessage(e), "\n")    .Internal(seterrmessage(msg[1L]))    if (!silent && identical(getOption("show.error.messages"),         TRUE)) {        cat(msg, file = stderr())        .Internal(printDeferredWarnings())    }    invisible(structure(msg, class = "try-error", condition = e))})
11: try(withVisible(eval(expr, .GlobalEnv)), silent = TRUE)
12: evalFunc(ce, options)
13: tryCatchList(expr, classes, parentenv, handlers)
14: tryCatch(evalFunc(ce, options), finally = {    cat("\n")    sink()})
15: driver$runcode(drobj, chunk, chunkopts)
16: utils::Sweave(...)
17: engine$weave(file, quiet = quiet, encoding = enc)
18: doTryCatch(return(expr), name, parentenv, handler)
19: tryCatchOne(expr, names, parentenv, handlers[[1L]])
20: tryCatchList(expr, classes, parentenv, handlers)
21: tryCatch({    engine$weave(file, quiet = quiet, encoding = enc)    setwd(startdir)    find_vignette_product(name, by = "weave", engine = engine)}, error = function(e) {    stop(gettextf("processing vignette '%s' failed with diagnostics:\n%s",         file, conditionMessage(e)), domain = NA, call. = FALSE)})
22: buildVignettes(dir = "/home/ripley/R/packages/tests32/mediation.Rcheck/vign_test/mediation")
An irrecoverable exception occurred. R is aborting now ...