better error message

2021-12-13 22:01:20 +01:00 · 2021-12-13 22:01:20 +01:00 · e3f4861c64
commit e3f4861c64
parent 7e3fb0bedd
1 changed files with 4 additions and 0 deletions
--- 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")
                                        })