ideogram track has hanging. commented out of Figure 14.

Author: jasonwalker80

scripts/Tutorial_Module4_Part2_cummeRbund.R

@@ -125,8 +125,8 @@ myStart<-min(features(myGene)$start)
 myEnd<-max(features(myGene)$end)
 myChr<-unique(features(myGene)$seqnames)
 genome<-'hg19'
-ideoTrack<-IdeogramTrack(genome=genome,chromosome=myChr)
-trackList<-c(trackList,ideoTrack)
+#ideoTrack<-IdeogramTrack(genome=genome,chromosome=myChr)
+#trackList<-c(trackList,ideoTrack)
 axtrack<-GenomeAxisTrack()
 trackList<-c(trackList,axtrack)
 genetrack<-makeGeneRegionTrack(myGene)