Update Stats2Table_fs7.R

Edit lines to read from aseg in FS7
Qoala-T · Feb 23, 2021 · 4319a8c · 4319a8c
1 parent a276d5f
commit 4319a8c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Scripts/Stats2Table/Stats2Table_fs7.R b/Scripts/Stats2Table/Stats2Table_fs7.R
@@ -31,7 +31,7 @@ readAseg <- function(){
 readMetaAseg <- function(){
   # The Aseg file of a subject is read in
   # Its metadata containing 'lhCortex' etc. and their volume are saved
-  aseg_meta <- readLines("./stats/aseg.stats", n=35)[16:36] #Edited for fs7.0.0 from line 16 iso line 15
+  aseg_meta <- readLines("./stats/aseg.stats", n=35)[15:34] #Edited for fs7.0.0 from line 15 iso line 14
   meta1 <- gsub("# ", "", aseg_meta)
   meta <- t(data.frame(strsplit(meta1, ",")))[,c(2,4)]
   metaTable <- t(data.frame(meta[,2]))