convert the transcript annotation to transcriptome assembly as FASTA file.
Examples
fasta <- tempfile()
annotation_to_fasta(system.file("extdata", "rps24.gtf.gz", package = "FLAMES"), system.file("extdata", "rps24.fa.gz", package = "FLAMES"), fasta)
cat(readChar(fasta, 1e3))
#> >ENSMUST00000169826.2
#> CTCTTTTCCTCCTCTCCAGCTCCGGCGCCGTAGCCATCATGAATGACACAGTAACCATCCGGACCAGGAAGTTCATGACC
#> AACCGTCTGCTTCAGAGGAAACAGATGGTCATTGATGTCCTTCATCCTGGGAAGGCAACAGTACCAAAGACAGAAATTCG
#> GGAAAAGCTGGCCAAAATGTACAAAACCACACCAGATGTCATCTTTGTATTTGGATTCAGAACCCACTTCGGTGGTGGCA
#> AGACCACTGGCTTTGGCATGATCTATGATTCTTTAGATTATGCAAAGAAGAATGAGCCTAAACACAGACTGGCAAGACAT
#> GGCCTTTATGAGAAGAAAAAGACCTCCCGAAAACAGCGAAAGGAACGCAAGAACAGAATGAAGAAGGTCAGGGGCACGGC
#> GAAGGCCAATGTTGGTGCTGGCAAAAAGTGAGTGGAGATTGGATACAGCCAAAGGAGTAGATCTGCGGTGACTTGATGTT
#> TTGCTGTGATGTGCAGATTTCTGAGAGGACAAATAAACT
#> >ENSMUST00000223939.1
#> CTCTCCAGCTCCGGCGCCGTAGCCATCATGAATGACACAGTAACCATCCGGACCAGGAAGTTCATGACCAACCGTCTGCT
#> TCAGAGGAAACAGATGGTCATTGATGTCCTTCATCCTGGGAAGGCAACAGTACCAAAGACAGAAATTCGGGAAAAGCTGG
#> CCAAAATGTACAAAACCACACCAGATGTCATCTTTGTATTTGGATTCAGAACCCACTTCGGTGGTGGCAAGACCACTGGC
#> TTTGGCATGATCTATGATTCTTTAGATTATGCAAAGAAGAATGAGCCTAAACACAGACTGGCAAGACATGGCCTTTATGA
#> GAAGAAAAAGACCTCCCGAAAACAGCGAAAGGAACGCAAGAACAGAATGAAGAAGGTCAGGGGCACGGCGAAGGCCAATG
#> TTGGTGCTGGCAAAAAGGTATGGTT