Browse code

Make sure we report the correct intercept

mnodzenski authored on 27/12/2022 23:08:38
Showing 1 changed files

... ...
@@ -1295,6 +1295,7 @@ List GxE_fitness_score_mvlm(NumericMatrix case_genetic_data_,
1295 1295
         // arma::mat x_vec_lengths = join_rows(x0_orig, mean_vec_lengths);
1296 1296
         // arma::vec beta_prob_disease = solve(x_vec_lengths, prob_disease, solve_opts::fast);
1297 1297
         arma::vec beta_prob_disease = solve(x_orig, prob_disease, solve_opts::fast);
1298
+        double beta_prob_disease_int = beta_prob_disease(0);
1298 1299
 
1299 1300
         // make sure association is positive 
1300 1301
         // bool pos_assoc = beta_prob_disease(1) > 0;
... ...
@@ -1351,6 +1352,9 @@ List GxE_fitness_score_mvlm(NumericMatrix case_genetic_data_,
1351 1352
         s_vec(1) = ht_trace;
1352 1353
         arma::vec centered_vec = s_vec - null_means;
1353 1354
         
1355
+        //reset the correct intercept
1356
+        beta_prob_disease(0) = beta_prob_disease_int;
1357
+        
1354 1358
         //make sure the elements are both greater than the random nulls, otherwise
1355 1359
         // set to small value
1356 1360
         bool neg_elem = any(centered_vec <= 0);