Add column names to CS correlation summary

AnqiWang2021 · Jul 30, 2022 · c39ab77 · c39ab77
1 parent f9a0033
commit c39ab77
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/susie_utils.R b/R/susie_utils.R
@@ -393,6 +393,7 @@ get_cs_correlation = function (model, X = NULL, Xcorr = NULL, max = FALSE) {
   if (max) {
     cs_corr = max(abs(cs_corr[upper.tri(cs_corr)]))
   }
+  rownames(cs_corr) = colnames(cs_corr) = names(model$sets$cs)
   return(cs_corr)
 }