# Retrieving the updog output multidog object
load(system.file("extdata", "iris-multidog.rdata", package = "BIGr"))
temp_file <- tempfile()
# Convert updog to VCF, where the new VCF will be saved at the location specified in the output.file
updog2vcf(
multidog.object = mout,
output.file = temp_file,
updog_version = "0.0.0",
compress = TRUE
)
#Removing the example vcf
rm(temp_file)
Run the code above in your browser using DataLab