From c4a6b2941bd235a4e5571410aa96c0d2a213858d Mon Sep 17 00:00:00 2001
From: pchelle <chelle.pierre@gmail.com>
Date: Tue, 17 Sep 2024 03:51:16 -0400
Subject: [PATCH] Fixes #1281 identity line in goodness of fit plots

---
 R/utilities-goodness-of-fit.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/utilities-goodness-of-fit.R b/R/utilities-goodness-of-fit.R
index 55f9999d1..b08149123 100644
--- a/R/utilities-goodness-of-fit.R
+++ b/R/utilities-goodness-of-fit.R
@@ -1117,7 +1117,7 @@ getResidualsPlotResultsInGroup <- function(data, metaData, outputId, structureSe
       dataMapping = obsVsPredDataMapping,
       plotConfiguration = obsVsPredPlotConfigurationLog,
       # Add identity line to log-log plot
-      foldDistance = 0
+      foldDistance = 1
     )
     goodnessOfFitCaptions[[resultId$obsVsPredLog]] <- getGoodnessOfFitCaptions(structureSet, "obsVsPred", "logarithmic", settings)
   }