From e18e284ecad0dce2d5a498b6ebc9522db7a9a607 Mon Sep 17 00:00:00 2001
From: xuewei cao <36172337+xueweic@users.noreply.github.com>
Date: Mon, 21 Apr 2025 20:04:24 -0400
Subject: [PATCH] minor fix

---
 tests/testthat/test_inference.R | 10 +++++-----
 tests/testthat/test_utils.R     | 10 +++++-----
 2 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/tests/testthat/test_inference.R b/tests/testthat/test_inference.R
index e433eb7..7442feb 100644
--- a/tests/testthat/test_inference.R
+++ b/tests/testthat/test_inference.R
@@ -19,13 +19,13 @@ generate_test_result <- function(n = 100, p = 20, L = 2, seed = 42) {
   
   if (L == 1) {
     # Single trait case
-    true_beta[5, 1] <- 0.5  # SNP5 affects the trait
-    true_beta[10, 1] <- 0.3 # SNP10 also affects the trait
+    true_beta[5, 1] <- 0.7  # SNP5 affects the trait
+    true_beta[10, 1] <- 0.6 # SNP10 also affects the trait
   } else {
     # Multi-trait case
-    true_beta[5, 1] <- 0.5  # SNP5 affects trait 1
-    true_beta[5, 2] <- 0.4  # SNP5 also affects trait 2 (colocalized)
-    true_beta[10, 2] <- 0.3 # SNP10 only affects trait 2
+    true_beta[5, 1] <- 0.7  # SNP5 affects trait 1
+    true_beta[5, 2] <- 0.6  # SNP5 also affects trait 2 (colocalized)
+    true_beta[10, 2] <- 0.5 # SNP10 only affects trait 2
   }
   
   # Generate Y with some noise
diff --git a/tests/testthat/test_utils.R b/tests/testthat/test_utils.R
index e3bd354..11fda10 100644
--- a/tests/testthat/test_utils.R
+++ b/tests/testthat/test_utils.R
@@ -19,13 +19,13 @@ generate_test_result <- function(n = 100, p = 20, L = 2, seed = 42) {
   
   if (L == 1) {
     # Single trait case
-    true_beta[5, 1] <- 0.5  # SNP5 affects the trait
-    true_beta[10, 1] <- 0.3 # SNP10 also affects the trait
+    true_beta[5, 1] <- 0.7  # SNP5 affects the trait
+    true_beta[10, 1] <- 0.6 # SNP10 also affects the trait
   } else {
     # Multi-trait case
-    true_beta[5, 1] <- 0.5  # SNP5 affects trait 1
-    true_beta[5, 2] <- 0.4  # SNP5 also affects trait 2 (colocalized)
-    true_beta[10, 2] <- 0.3 # SNP10 only affects trait 2
+    true_beta[5, 1] <- 0.7  # SNP5 affects trait 1
+    true_beta[5, 2] <- 0.6  # SNP5 also affects trait 2 (colocalized)
+    true_beta[10, 2] <- 0.5 # SNP10 only affects trait 2
   }
   
   # Generate Y with some noise