From 4c303f6c43173c1b87f6f675b1db865f4c25a7b0 Mon Sep 17 00:00:00 2001
From: Alexander_Kabui
Date: Tue, 29 Oct 2024 20:31:42 +0300
Subject: Refactor: make plot in the temp directory passed in the script
 arguments.

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

(limited to 'scripts')

diff --git a/scripts/rqtl2_wrapper.R b/scripts/rqtl2_wrapper.R
index cdbbd17..ab3fa3e 100644
--- a/scripts/rqtl2_wrapper.R
+++ b/scripts/rqtl2_wrapper.R
@@ -330,7 +330,7 @@ generate_lod_plot <- function(cross, scan_result, method, base_dir = ".") {
 }
 
 
-lod_plot_path <- generate_lod_plot(dataset, scan_results, "HK")
+lod_plot_path <- generate_lod_plot(dataset, scan_results, "HK", base_dir=opt$directory)
 lod_plot_path
 
 
-- 
cgit 1.4.1