From 8d9c0d82c77cac20571320322baf95df145fbe5b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Tomasz=20Wo=C5=BAniak?= Date: Thu, 25 Jan 2024 13:14:34 +1100 Subject: [PATCH] included the imported sampling functions filling by assignment #4 --- src/bsvars_sign.cpp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/bsvars_sign.cpp b/src/bsvars_sign.cpp index a3a70d1..629c571 100644 --- a/src/bsvars_sign.cpp +++ b/src/bsvars_sign.cpp @@ -64,9 +64,9 @@ Rcpp::List bsvar_sign_cpp( // Check for user interrupts if (s % 200 == 0) checkUserInterrupt(); - bsvars::sample_hyperparameters(aux_hyper, aux_B, aux_A, VB, prior); - bsvars::sample_A_homosk1(aux_A, aux_B, aux_hyper, Y, X, prior); - bsvars::sample_B_homosk1(aux_B, aux_A, aux_hyper, Y, X, prior, VB); + aux_hyper = bsvars::sample_hyperparameters(aux_hyper, aux_B, aux_A, VB, prior); + aux_A = bsvars::sample_A_homosk1(aux_A, aux_B, aux_hyper, Y, X, prior); + aux_B = bsvars::sample_B_homosk1(aux_B, aux_A, aux_hyper, Y, X, prior, VB); if (s % thin == 0) { posterior_B.slice(ss) = aux_B;