get_w_soln() undefined

[hopehappyday0414]

For function
extract_data_info(signal_model,
linear_model,
ref_covs,
alt_covs,
exp_quantiles = c(0.15, 0.85),
exp_bounds = NULL,
num_points = 100L,
normalize_to = NULL)
signal_model to extract weights from get_w_soln()
However, get_w_soln() has not been defined by MRBeRT module
I want to know whether the followed code can replace the role of get_w_soln()
w <- t(do.call(rbind,
lapply(1:length(signal_model$sub_models),
function(i){signal_model$sub_models[[i]]$w_soln}))
) %*% signal_model$weights

Or what can I do to make extract_data_info() run correctly?