tp4.R

#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)