# NOT RUN {
library(RCircos)
data(UCSC.Mouse.GRCm38.CytoBandIdeogram)
data(UCSC.Baylor.3.4.Rat.cytoBandIdeogram)
cyto.list <- list(UCSC.Mouse.GRCm38.CytoBandIdeogram,
UCSC.Baylor.3.4.Rat.cytoBandIdeogram);
species <- c("M", "R")
RCircos.Multiple.Species.Core.Components(
cyto.list, species, chr.exclude=NULL,
tracks.inside=10, tracks.outside=0)
# }
Run the code above in your browser using DataLab