Using the quant smooth package to retrieve chromosome lengths produces this size for chromosome 18 (as example, others are also different): 76117153
however, both ensemble and ncbi give a value over 80 mbp for that chromosome. I used this command:
chrlen<-lengthChromosome(chroms[i],"bases") print(paste("processing chrom ",chroms[i]," (",chrlen,")",sep="")) plot(c(0,chrlen),c(-2,nrow(lesions_list)+4.5),type="n", xaxt="n",yaxt="n",xlab="",ylab="",main=paste("Chromosome ",chroms[i], "(",peaks,")",sep="")) par(xpd=TRUE) #allow plotting outside margin # draw chromosome at the bottom of plotting area... paintCytobands(chroms[i],units="bases",pos=c(1,2),width=1,legend=FALSE)
when I place hg19 based coordinates above the plot, the features extend beyond the end of the chromosome.
can we specify genome release version ? or supply our own bands files ?
thanks much !
Bob