# the file name of VCF
vcf.fn <- seqExampleFileName("vcf")
# or vcf.fn <- "C:/YourFolder/Your_VCF_File.vcf"
# convert
seqVCF2GDS(vcf.fn, "tmp.gds")
# display
(f <- seqOpen("tmp.gds"))
seqClose(f)
# convert without the INFO fields
seqVCF2GDS(vcf.fn, "tmp.gds", info.import=character(0))
# display
(f <- seqOpen("tmp.gds"))
seqClose(f)
# convert without the INFO fields
seqVCF2GDS(vcf.fn, "tmp.gds",
info.import=character(0), fmt.import=character(0))
# display
(f <- seqOpen("tmp.gds"))
seqClose(f)
Run the code above in your browser using DataLab