From e3f4861c64ec55a0df0eb13809ffd0da66ae2dd1 Mon Sep 17 00:00:00 2001
From: Hollos Roland <hollorol@gmail.com>
Date: Mon, 13 Dec 2021 22:01:20 +0100
Subject: [PATCH] better error message

---
 RBBGCMuso/R/multiSite.R | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/RBBGCMuso/R/multiSite.R b/RBBGCMuso/R/multiSite.R
index e868fcc..5be9ffc 100644
--- a/RBBGCMuso/R/multiSite.R
+++ b/RBBGCMuso/R/multiSite.R
@@ -176,6 +176,10 @@ multiSiteCalib <- function(measurements,
                                }
 
                       , error = function(e){
+                                            # browser()
+                                            sink("error.txt")
+                                            print(e)
+                                            sink()
                                             saveRDS(e,"error.RDS")
                                             writeLines(as.character(iterations),"progress.txt")
                                         })