conservation track has hanging. commented out of Figure 14.

Author: jasonwalker80

scripts/Tutorial_Module4_Part2_cummeRbund.R

@@ -136,8 +136,8 @@ trackList<-c(trackList,genetrack)
 #trackList<-c(trackList,biomTrack)
 
 #Add conservation levels
-conservation<-UcscTrack(genome="hg19",chromosome=myChr,track="Conservation",table="phyloP100wayAll",from=myStart-2000,to=myEnd+2000,trackType="DataTrack",start="start",end="end",data="score",type="hist",window="auto",col.histogram="darkblue",fill.histogram="darkblue",ylim=c(-3.7,4),name="Conservation")
-trackList<-c(trackList,conservation)
+#conservation<-UcscTrack(genome="hg19",chromosome=myChr,track="Conservation",table="phyloP100wayAll",from=myStart-2000,to=myEnd+2000,trackType="DataTrack",start="start",end="end",data="score",type="hist",window="auto",col.histogram="darkblue",fill.histogram="darkblue",ylim=c(-3.7,4),name="Conservation")
+#trackList<-c(trackList,conservation)
 plotTracks(trackList,from=myStart-2000,to=myEnd+2000)
 
 #Close pdf device - necessary before you can open it in your browser