Fixed scripts/annotated_snps_filter.R

The working directory is now set *before* reading annotated SNP files
rnnh · Nov 12, 2020 · aa1c8f5 · aa1c8f5
1 parent 486a2b0
commit aa1c8f5
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/scripts/annotated_snps_filter.R b/scripts/annotated_snps_filter.R
@@ -23,6 +23,9 @@ annotated_SNP_file_2 <- "<.tsv File name here>"
 
 # Setup ========================================================================
 
+# Setting the working directory
+setwd("~/bioinfo-notebook/data")
+
 annotated_SNP_file_1 <- read.table(
   annotated_SNP_file_1,
   stringsAsFactors = FALSE, header = TRUE)
@@ -31,9 +34,6 @@ annotated_SNP_file_2 <- read.table(
   annotated_SNP_file_2,
   stringsAsFactors = FALSE, header = TRUE)
 
-# Setting the working directory
-setwd("~/bioinfo-notebook/data")
-
 # Finding rows in common between annotated SNP data frames =====================
 
 # This needs to be carried out multiple times because the number of rows in