STAARpipeline

xihaoli · Feb 17, 2024 · 8ccbaa5 · 8ccbaa5
1 parent 872c7d6
commit 8ccbaa5
Show file tree

Hide file tree

Showing 6 changed files with 12 additions and 12 deletions.
diff --git a/STAARpipeline_Gene_Centric_Coding.r b/STAARpipeline_Gene_Centric_Coding.r
@@ -2,7 +2,7 @@
 # Gene-centric analysis for coding rare variants using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/16/2024
+# Current date: 02/17/2024
 #####################################################################
 rm(list=ls())
 gc()
@@ -52,7 +52,7 @@ arrayid <- as.numeric(commandArgs(TRUE)[1])
 #           Main Function 
 ###########################################################
 ## gene number in job
-gene_num_in_array <- 50 
+gene_num_in_array <- 50
 group.num.allchr <- ceiling(table(genes_info[,2])/gene_num_in_array)
 sum(group.num.allchr)
 

diff --git a/STAARpipeline_Gene_Centric_Coding_Long_Masks.r b/STAARpipeline_Gene_Centric_Coding_Long_Masks.r
@@ -2,7 +2,7 @@
 # Gene-centric analysis for coding rare variants in long masks using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/16/2024
+# Current date: 02/17/2024
 ##################################################################################
 rm(list=ls())
 gc()
@@ -52,7 +52,7 @@ arrayid_longmask <- as.numeric(commandArgs(TRUE)[1])
 #           Main Function 
 ###########################################################
 ## gene number in job
-gene_num_in_array <- 50 
+gene_num_in_array <- 50
 group.num.allchr <- ceiling(table(genes_info[,2])/gene_num_in_array)
 sum(group.num.allchr)
 

diff --git a/STAARpipeline_Gene_Centric_Noncoding.r b/STAARpipeline_Gene_Centric_Noncoding.r
@@ -3,7 +3,7 @@
 # genes using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/16/2024
+# Current date: 02/17/2024
 #####################################################################
 rm(list=ls())
 gc()
@@ -53,7 +53,7 @@ arrayid <- as.numeric(commandArgs(TRUE)[1])
 #           Main Function 
 ###########################################################
 ## gene number in job
-gene_num_in_array <- 50 
+gene_num_in_array <- 50
 group.num.allchr <- ceiling(table(genes_info[,2])/gene_num_in_array)
 sum(group.num.allchr)
 

diff --git a/STAARpipeline_Gene_Centric_Noncoding_Long_Masks.r b/STAARpipeline_Gene_Centric_Noncoding_Long_Masks.r
@@ -3,7 +3,7 @@
 # of protein-coding genes using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/16/2024
+# Current date: 02/17/2024
 #####################################################################
 rm(list=ls())
 gc()
@@ -53,7 +53,7 @@ arrayid_longmask <- as.numeric(commandArgs(TRUE)[1])
 #           Main Function 
 ###########################################################
 ## gene number in job
-gene_num_in_array <- 50 
+gene_num_in_array <- 50
 group.num.allchr <- ceiling(table(genes_info[,2])/gene_num_in_array)
 sum(group.num.allchr)
 

diff --git a/STAARpipeline_Gene_Centric_ncRNA.r b/STAARpipeline_Gene_Centric_ncRNA.r
@@ -3,7 +3,7 @@
 # genes using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/16/2024
+# Current date: 02/17/2024
 #####################################################################
 rm(list=ls())
 gc()
@@ -53,7 +53,7 @@ arrayid <- as.numeric(commandArgs(TRUE)[1])
 #           Main Function 
 ###########################################################
 ## gene number in job
-gene_num_in_array <- 100 
+gene_num_in_array <- 100
 group.num.allchr <- ceiling(table(ncRNA_gene[,1])/gene_num_in_array)
 sum(group.num.allchr)
 

diff --git a/STAARpipeline_Gene_Centric_ncRNA_Long_Masks.r b/STAARpipeline_Gene_Centric_ncRNA_Long_Masks.r
@@ -3,7 +3,7 @@
 # of ncRNA genes using STAARpipeline
 # Xihao Li, Zilin Li
 # Initiate date: 11/04/2021
-# Current date: 02/05/2024
+# Current date: 02/17/2024
 #####################################################################
 rm(list=ls())
 gc()
@@ -56,7 +56,7 @@ sub_seq_id <- c(53,19,208,274,311,41,103)
 
 region_spec <- data.frame(arrayid,sub_seq_id)
 
-gene_num_in_array <- 100 
+gene_num_in_array <- 100
 group.num.allchr <- ceiling(table(ncRNA_gene[,1])/gene_num_in_array)
 sum(group.num.allchr)