# NOT RUN {
library(RCircos);
data(UCSC.HG19.Human.CytoBandIdeogram);
data(RCircos.Link.Data);
RCircos.Set.Core.Components(
cyto.inf=UCSC.HG19.Human.CytoBandIdeogram,
chr.exclude=c("chrX", "chrY"),
num.inside=10, num.outside=0)
RCircos.Set.Plot.Area()
RCircos.Chromosome.Ideogram.Plot()
RCircos.Link.Plot(RCircos.Link.Data, track.num=4,
by.chromosome=TRUE)
RCircos.Link.Plot(RCircos.Link.Data, start.pos=0.75,
by.chromosome=TRUE)
# }
Run the code above in your browser using DataLab