Thêm chú giải (Annotations)

Xem biểu đồ sau:

Nó rất giống với biểu đồ bạn đã tạo ở bài tập trước. Bên cạnh dữ liệu, nó còn hiển thị một track tên là Genes với chú giải gene. Bạn sẽ chạy các đoạn mã sau theo thứ tự nào để thêm track này vào biểu đồ?

Fragment 1

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

Fragment 2

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

Fragment 3

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

Fragment 4

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