circos.trackPlotRegion(ylim = c(0, 1), factors = LobeID$LobeID, track.height=0.1, #panel.fun for each sector panel.fun = function(x, y) { #select details of current sector name <- get.cell.meta.data("sector.index") i <- get.cell.meta.data("sector.numeric.index") xlim <- ge...