# NOT RUN {
test_path <- system.file("tests", package = "rtracklayer")
test_gff3 <- file.path(test_path, "genes.gff3")
gr <- read_gff3(test_gff3)
out_gff3 <- file.path(tempdir(), "test.gff3")
write_gff3(gr, out_gff3)
read_gff3(out_gff3)
# }
Run the code above in your browser using DataLab