From 944396123395f1b06b269a000558ac7ccf0f56d6 Mon Sep 17 00:00:00 2001
From: Hollos Roland <hollorol@gmail.com>
Date: Tue, 4 Jan 2022 14:16:33 +0100
Subject: [PATCH] now

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

diff --git a/RBBGCMuso/R/multiSite.R b/RBBGCMuso/R/multiSite.R
index 5be9ffc..bee1320 100644
--- a/RBBGCMuso/R/multiSite.R
+++ b/RBBGCMuso/R/multiSite.R
@@ -247,6 +247,7 @@ multiSiteCalib <- function(measurements,
     results <- (rbind(res0,resultsSans0))
     write.csv(results,"result.csv")
     calibrationPar <- future::value(fut[[1]], stdout = FALSE, signal=FALSE)[["calibrationPar"]]
+    browser()
     if(!is.null(constraints)){
         notForTree <- c(seq(from = (length(calibrationPar)+1), length.out=3))
         notForTree <- c(notForTree,which(sapply(seq_along(calibrationPar),function(i){sd(results[,i])==0})))