From 2cabf78d6b0dfd1249755c7e7645167768b773dd Mon Sep 17 00:00:00 2001
From: Romain Franconville <romain.franconville@protonmail.com>
Date: Tue, 14 Jan 2020 11:48:32 -0500
Subject: [PATCH] Small fix to avoid returning results from ROIs that start
 with the same letters

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

diff --git a/R/connectivity.R b/R/connectivity.R
index 38a941e4..4641368b 100644
--- a/R/connectivity.R
+++ b/R/connectivity.R
@@ -218,7 +218,7 @@ extract_connectivity_df <- function(rois, json){
   for(roi in rois){
     d <-  data.frame(0,0)
     colnames(d) <- paste0(roi,c(".pre",".post"))
-    b <-  a[startsWith(names(a),roi)]
+    b <-  a[startsWith(names(a),paste0(roi,"."))]
     d[names(b)] <-  b
     values <- cbind(values,d)
   }