From ec7c207e944c237b8be66649c4ae1ab9d2d6b751 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Francisco=20Javier=20Luna=20V=C3=A1zquez?=
 <frahik@gmail.com>
Date: Thu, 16 Aug 2018 15:28:48 -0500
Subject: [PATCH] fixed progressbar

---
 R/BayesianCore.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/BayesianCore.R b/R/BayesianCore.R
index 02a4a7b..fc7c504 100644
--- a/R/BayesianCore.R
+++ b/R/BayesianCore.R
@@ -1285,7 +1285,7 @@ BGLR <- function(y, response_type = "gaussian", a = NULL, b = NULL, ETA = NULL,
   }
 
   pb <- progress::progress_bar$new(format = "Fitting the model [:bar] :percent; Time remaining: :eta",
-                                   total = nIter/20L, clear = FALSE, )
+                                   total = nIter/20L, clear = FALSE)
 
   # Gibbs sampler
   #time = proc.time()[3]