diff --git a/src/tp2.R b/src/tp2.R new file mode 100644 index 0000000000000000000000000000000000000000..1ab01b543ea7efa6d6f0ff9f507543d517bdf0bc --- /dev/null +++ b/src/tp2.R @@ -0,0 +1,20 @@ +#load data +load("results/tp1/TP1_asbvg.RData") + +#fichier de sortie +output_dir = "results/tp2" +dir.create(output_dir, showWarnings = F, recursive = T) + +#on installe et ouvre les packages/librairies nécessaires + +if (!require("BiocManager", quietly=TRUE)) + install.packages("BiocManager") + +if (!require("SNPRelate", quietly=TRUE)) + BiocManager::install("SNPRelate") + +#on enregistre le fichier de sortie + +rdata_path = file.path(output_dir, "TP2_asbvg.RData") +save.image(rdata_path) + diff --git a/src/tp3.R b/src/tp3.R new file mode 100644 index 0000000000000000000000000000000000000000..d7c176fd6e9d9dc5270ea7042547b1e7d8df4f67 --- /dev/null +++ b/src/tp3.R @@ -0,0 +1,25 @@ +#load data +load("results/tp2/TP2_asbvg.RData") + +#fichier de sortie +output_dir = "results/tp3" +dir.create(output_dir, showWarnings = F, recursive = T) + +#library +if (!require("BiocManager", quietly = TRUE)) + install.packages("BiocManager") + +if (!require("snpStats", quietly = TRUE)) + BiocManager::install("snpStats") + +if (!require("doParallel", quietly = TRUE)) + BiocManager::install("doParallel") + +library(snpStats) +library(plyr) +library(GenABEL) +library(doParallel) + +rdata_path = file.path(output_dir,"TP3_asbvg.RData") +save.image(rdata_path) + diff --git a/src/tp4.R b/src/tp4.R new file mode 100644 index 0000000000000000000000000000000000000000..89340804dbc635b96a5136de52dd128ca6f36946 --- /dev/null +++ b/src/tp4.R @@ -0,0 +1,20 @@ +#load data +load("results/tp3/TP3_asbvg.RData") + +#fichier de sortie +output_dir = "results/tp4" +dir.create(output_dir, showWarnings = F, recursive = T) + +#Library +if(!require("dplyr",quietly = T)) + install.packages("dplyr") + +if(!require("plyr",quietly = T)) + install.packages("plyr") + +if(!require("GenABEL",quietly = T)) + install.packages("GenABEL") + +rdata_path = file.path(output_dir,"TP4_asbvg.RData") +save.image(rdata_path) +