Añadir anotaciones

Observa este gráfico:

Es muy similar al que creaste en el ejercicio anterior. Además de los datos, muestra una pista llamada Genes con anotaciones de genes. ¿En qué orden ejecutarías los siguientes fragmentos de código para añadir esta pista al gráfico?

Fragmento 1

plotTracks(list(ideogram, cover_track,peak_track, tx, 
           GenomeAxisTrack()), chromosome="chr20", 
           from = start_pos, to=end_pos)

Fragmento 2

tx <- AnnotationTrack(TxDb.Hsapiens.UCSC.hg19.knownGene, name="Genes")

Fragmento 3

tx <- GeneRegionTrack(TxDb.Hsapiens.UCSC.hg19.knownGene, name="Genes")

Fragmento 4

library(TxDb.Hsapiens.UCSC.hg19.knownGene)