Commit 2389d668 authored by Marie  BOURDON's avatar Marie BOURDON
Browse files

Merge branch 'develop' into 'master'

Update write_rqtl.R

See merge request !7
parents f6809a82 3afae76c
......@@ -59,6 +59,9 @@ write_rqtl <- function(geno,pheno,tab,ref,par1,par2,prefix,pos,path=NA){
#merge genotypes with parents
geno <- left_join(geno,ref,by=c("marker"="marker"))
#remove snps with no position
geno <- geno %>% filter(is.na(chr)==FALSE)
#recode "-" in "N" in geno file
geno <- geno %>% mutate(allele_1 = recode(allele_1,
"-" = "N"))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment