feature request #202

[MingLi-929]

this pr is to add function of changing colors of vennpie

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

files <- getSampleFiles()
txdb <- TxDb.Hsapiens.UCSC.hg19.knownGene

peakAnno <- annotatePeak(files[[4]], 
                         tssRegion=c(-3000, 3000),
                         TxDb=txdb, annoDb="org.Hs.eg.db")

vennpie(peakAnno)

users can pass the col parameter to change colors, try to be notice the colors item should equal to the items in the picture

vennpie(peakAnno,col=c(NO='white',Genic='#fee0d2',Intergenic='#fec44f',
                       Intron='#fc9272',Exon='#ffeda0', Upstream='#9ecae1',
                       Downstream='#3182bd',Distal_Intergenic='#d95f0e'))

[GuangchuangYu]

with my update, you can:

vennpie(peakAnno,col=c(Upstream='red'))

to only change selected categories.