R/VCF_split_into_scaffolds.R

VCF_split_into_scaffolds <- function(VCF.file,output.folder){


dir.create(output.folder)

# Output Folder
if (.Platform$OS.type == "unix") {
 output.folder <- paste(output.folder,"/", sep="")
}else{
output.folder <- paste(output.folder,"\\", sep="")
}


out <- .Call("split_VCF_scaffolds",VCF.file,output.folder)

return(TRUE)
}
pievos101/PopGenome documentation built on May 16, 2019, 2:54 a.m.