Error in re-building vignettes:
  ...

 *** caught segfault ***
address (nil), cause 'memory not mapped'

Traceback:
 1: grid.Call(C_stringMetric, as.graphicsAnnot(x$label))
 2: descentDetails.text(text_grob)
 3: descentDetails(text_grob)
 4: titleGrob(label, x, y, hjust = hj, vjust = vj, angle = angle,     gp = utils::modifyList(element_gp, gp), margin = margin,     expand_x = expand_x, expand_y = expand_y, debug = element$debug)
 5: element_grob.element_text(el, ...)
 6: element_grob(el, ...)
 7: element_render(theme = theme, element = paste0("axis.title.",     label, modify), label = labels[[label]][[i]], expand_x = label ==     "y", expand_y = label == "x")
 8: FUN(X[[i]], ...)
 9: lapply(c(1, 2), function(i) {    modify <- if (i == 2 && label == "y")         ".right"    else if (i == 1 && label == "x")         ".top"    else ""    if (is.null(labels[[label]][[i]]) || is.waive(labels[[label]][[i]]))         return(zeroGrob())    element_render(theme = theme, element = paste0("axis.title.",         label, modify), label = labels[[label]][[i]], expand_x = label ==         "y", expand_y = label == "x")})
10: FUN(X[[i]], ...)
11: lapply(names(labels), function(label) {    lapply(c(1, 2), function(i) {        modify <- if (i == 2 && label == "y")             ".right"        else if (i == 1 && label == "x")             ".top"        else ""        if (is.null(labels[[label]][[i]]) || is.waive(labels[[label]][[i]]))             return(zeroGrob())        element_render(theme = theme, element = paste0("axis.title.",             label, modify), label = labels[[label]][[i]], expand_x = label ==             "y", expand_y = label == "x")    })})
12: f(..., self = self)
13: self$render_labels(labels, theme)
14: f(..., self = self)
15: layout$render(geom_grobs, data, plot$coordinates, theme, plot$labels)
16: ggplot_gtable(data)
17: print.ggplot(x)
18: print(x)
19: normal_print(x)
20: knit_print.default(x, ...)
21: knit_print(x, ...)
22: withVisible(knit_print(x, ...))
23: fun(x, options = options)
24: value_fun(ev$value, ev$visible)
25: withVisible(value_fun(ev$value, ev$visible))
26: withCallingHandlers(withVisible(value_fun(ev$value, ev$visible)),     warning = wHandler, error = eHandler, message = mHandler)
27: handle(pv <- withCallingHandlers(withVisible(value_fun(ev$value,     ev$visible)), warning = wHandler, error = eHandler, message = mHandler))
28: evaluate_call(expr, parsed$src[[i]], envir = envir, enclos = enclos,     debug = debug, last = i == length(out), use_try = stop_on_error !=         2L, keep_warning = keep_warning, keep_message = keep_message,     output_handler = output_handler, include_timing = include_timing)
29: evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning),     keep_message = !isFALSE(options$message), stop_on_error = if (options$error &&         options$include) 0L else 2L, output_handler = knit_handlers(options$render,         options))
30: in_dir(input_dir(), evaluate(code, envir = env, new_device = FALSE,     keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message),     stop_on_error = if (options$error && options$include) 0L else 2L,     output_handler = knit_handlers(options$render, options)))
31: block_exec(params)
32: call_block(x)
33: process_group.block(group)
34: process_group(group)
35: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group),     error = function(e) {        setwd(wd)        cat(res, sep = "\n", file = output %n% "")        message("Quitting from lines ", paste(current_lines(i),             collapse = "-"), " (", knit_concord$get("infile"),             ") ")    })
36: process_file(text, output)
37: knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet,     encoding = encoding)
38: rmarkdown::render(file, encoding = encoding, quiet = quiet, envir = globalenv())
39: vweave_rmarkdown(...)
40: engine$weave(file, quiet = quiet, encoding = enc)
41: doTryCatch(return(expr), name, parentenv, handler)
42: tryCatchOne(expr, names, parentenv, handlers[[1L]])
43: tryCatchList(expr, classes, parentenv, handlers)
44: 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)})
45: buildVignettes(dir = "/data/gannet/ripley/R/packages/tests-devel/ggspectra.Rcheck/vign_test/ggspectra")
An irrecoverable exception occurred. R is aborting now ...