From 4cce30f9ffe78a2aaaf22dcb018774b30352ce2e Mon Sep 17 00:00:00 2001 From: Peter Hickey Date: Thu, 10 Jul 2025 16:17:27 +1000 Subject: [PATCH] Fix #149 --- R/combine.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/combine.R b/R/combine.R index e798032..61370a7 100644 --- a/R/combine.R +++ b/R/combine.R @@ -196,8 +196,8 @@ combineList <- function(x, ..., BACKEND = NULL) { ans_M <- do.call(cbind, Map(extractROWS, x_M, x_order)) ans_Cov <- do.call(cbind, Map(extractROWS, x_Cov, x_order)) if (combine_smooths) { - ans_M <- do.call(cbind, Map(extractROWS, x_M, x_order)) - ans_Cov <- do.call(cbind, Map(extractROWS, x_Cov, x_order)) + ans_coef <- do.call(cbind, Map(extractROWS, x_coef, x_order)) + ans_se.coef <- do.call(cbind, Map(extractROWS, x_se.coef, x_order)) } } } else {