Running examples in ‘SeaSondeR-Ex.R’ failed
The error most likely occurred in:

> ### Name: seasonder_MUSICLonLat
> ### Title: Map MUSIC Bearings to Geographic Coordinates
> ### Aliases: seasonder_MUSICLonLat seasonder_MUSIC_LonLat
> 
> ### ** Examples
> 
> # Create a SeaSondeRCS object for MUSIC example
> cs_file <- system.file("css_data/CSS_TORA_24_04_04_0700.cs", package = "SeaSondeR")
> apm_file <- system.file("css_data/MeasPattern.txt", package = "SeaSondeR")
> apm_obj  <- seasonder_readSeaSondeRAPMFile(apm_file)
seasonder_createSeaSondeRAPM:  APM object created successfully.
> cs_obj   <- seasonder_createSeaSondeRCS(cs_file, seasonder_apm_object = apm_obj)
new_SeaSondeRCS:  SeaSondeRCS object created successfully.
> cs_obj <- seasonder_initMUSICData(
+  cs_obj,
+  range_cells = c(rep(5,11), rep(4,11)),
+  doppler_bins = c(c(669:679),c(674:684))
+ )
> cs_obj <- seasonder_runMUSIC(cs_obj)
seasonder_runMUSIC:  MUSIC algorithm started.

 *** caught segfault ***
address 0x1, cause 'invalid permissions'

Traceback:
 1: eigen(C, symmetric = TRUE)
 2: .f(.x[[i]], ...)
 3: .Primitive(".Call")(list(name = "map_impl", address = <pointer: 0x6000026d00e0>,     dll = list(name = "purrr", path = "/Volumes/Builds/packages/sonoma-arm64/Rlib/4.6/purrr/libs/purrr.so",         dynamicLookup = FALSE, handle = <pointer: 0x6e393080>,         info = <pointer: 0x6000002e4060>, forceSymbols = FALSE),     numParameters = 6L), <environment>, "list", FALSE, 14L, NULL,     1L)
 4: call_with_cleanup(map_impl, environment(), .type, .progress,     n, names, i)
 5: withCallingHandlers(expr, error = function(cnd) {    if (i == 0L) {    }    else {        message <- c(i = "In index: {i}.")        if (!is.null(names) && !is.na(names[[i]]) && names[[i]] !=             "") {            name <- names[[i]]            message <- c(message, i = "With name: {name}.")        }        else {            name <- NULL        }        cli::cli_abort(message, location = i, name = name, parent = cnd,             call = error_call, class = "purrr_error_indexed")    }})
 6: with_indexed_errors(i = i, names = names, error_call = .purrr_error_call,     call_with_cleanup(map_impl, environment(), .type, .progress,         n, names, i))
 7: map_("list", .x, .f, ..., .progress = .progress)
 8: purrr::map(cov, seasonder_eigen_decomp_C)
 9: .Call(dplyr_mask_eval_all_mutate, quo, private)
10: eval()
11: mask$eval_all_mutate(quo)
12: mutate_col(dots[[i]], data, mask, new_columns)
13: withCallingHandlers(for (i in seq_along(dots)) {    poke_error_context(dots, i, mask = mask)    context_poke("column", old_current_column)    new_columns <- mutate_col(dots[[i]], data, mask, new_columns)}, error = dplyr_error_handler(dots = dots, mask = mask, bullets = mutate_bullets,     error_call = error_call, error_class = "dplyr:::mutate_error"),     warning = dplyr_warning_handler(state = warnings_state, mask = mask,         error_call = error_call))
14: mutate_cols(.data, dplyr_quosures(...), by)
15: mutate.data.frame(., eigen = purrr::map(cov, seasonder_eigen_decomp_C))
16: dplyr::mutate(., eigen = purrr::map(cov, seasonder_eigen_decomp_C))
17: MUSIC %<>% dplyr::mutate(eigen = purrr::map(cov, seasonder_eigen_decomp_C))
18: seasonder_MUSICCovDecomposition(.)
19: out %<>% seasonder_MUSICCovDecomposition()
20: seasonder_runMUSIC(cs_obj)
An irrecoverable exception occurred. R is aborting now ...