scale_fill_giemsa {ggbio} | R Documentation |
scale filled color to customized giemsa color.
scale_fill_giemsa(fill = getOption("biovizBase")$cytobandColor)
fill |
a character vector to indicate colors, and names of vector mapped to gieStain name. |
a list.
Tengfei Yin
getOption("biovizBase")$cytobandColor
## gneg gpos25 gpos50 gpos75 gpos100 gvar stalk
## "grey100" "grey90" "grey70" "grey40" "grey0" "grey100" "brown3"
## acen
## "brown4"
library(biovizBase)
data(hg19IdeogramCyto)
p1 <- autoplot(hg19IdeogramCyto, layout = "karyogram", aes(fill =
gieStain))
## Warning: geom(ideogram) need valid seqlengths information for accurate
## mapping, now use reduced information as ideogram...
## Warning: geom(ideogram) need valid seqlengths information for accurate
## mapping, now use reduced information as ideogram...
## Scale for 'x' is already present. Adding another scale for 'x', which will
## replace the existing scale.
p1
p1 + scale_fill_giemsa()