don't include sigma_raw in trend_pars

nicholasjclark · Sep 3, 2023 · fd67fef · fd67fef
1 parent 645a5e5
commit fd67fef
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/R/index-mvgam.R b/R/index-mvgam.R
@@ -139,14 +139,16 @@ variables.mvgam = function(x, ...){
                        'ar3', 'A',
                        'Sigma'), collapse = '|'),
                parnames) &
-         !grepl('sigma_obs', parnames, fixed = TRUE))){
+         !grepl('sigma_obs', parnames, fixed = TRUE) &
+         !grepl('sigma_raw', parnames, fixed = TRUE))){
     trend_pars <- grepl(paste(c('sigma', 'alpha_gp',
                                 'rho_gp',
                                 'ar1', 'ar2',
                                 'ar3', 'A',
                                 'Sigma'), collapse = '|'),
                         parnames) &
-      !grepl('sigma_obs', parnames, fixed = TRUE)
+      !grepl('sigma_obs', parnames, fixed = TRUE) &
+      !grepl('sigma_raw', parnames, fixed = TRUE)
     trend_pars <- data.frame(orig_name = parnames[trend_pars],
                                    alias = NA)
   } else {