sectors = letters[1:4]
circos.par(points.overflow.warning = FALSE)
circos.initialize(sectors, xlim = c(0, 10))
circos.trackPlotRegion(sectors, ylim = c(0, 10),
track.height = 0.5, panel.fun = function(x, y) {
circos.text(3, 1, "inside", facing = "inside", cex = 0.8)
circos.text(7, 1, "outside", facing = "outside", cex = 0.8)
circos.text(0, 5, "reverse.clockwise", facing = "reverse.clockwise",
adj = c(0.5, 0), cex = 0.8)
circos.text(10, 5, "clockwise", facing = "clockwise", adj = c(0.5, 0),
cex = 0.8)
circos.text(5, 5, "downward", facing = "downward", cex = 0.8)
circos.text(3, 9, "====bending.inside====", facing = "bending.inside",
cex = 0.8)
circos.text(7, 9, "====bending.outside====", facing = "bending.outside",
cex = 0.8)
})
circos.clear()
Run the code above in your browser using DataLab