在您的示例中,您需要在圆圈外最多创建一个空轨道,然后返回到该空轨道以添加光栅图像。
在以下示例中,preAllocateTracks
参数用于定义应放置多少个空轨道。关于这个论点的更多解释,请参考:http: //zuguang.de/circlize_book/book/advanced-usage-of-chorddiagram.html#organization-of-tracks
mat = matrix(sample(100, 25), 5)
rownames(mat) = letters[1:5]
colnames(mat) = letters[1:5]
library(circlize)
library(png)
tmp = tempfile()
download.file("https://www.google.de/images/branding/googlelogo/1x/googlelogo_color_272x92dp.png", tmp)
image = as.raster(readPNG(tmp))
ratio = ncol(image)/nrow(image)
chordDiagram(mat, directional = TRUE, transparency = 0.5,
preAllocateTracks = 1)
circos.track(track.index = 1, panel.fun = function(x, y) {
xcenter = get.cell.meta.data("xcenter")
ycenter = get.cell.meta.data("ycenter")
pos = circlize:::polar2Cartesian(circlize(xcenter, ycenter))
rasterImage(image,
xleft = pos[1, 1] - 0.05*ratio,
ybottom = pos[1, 2] - 0.05,
xright = pos[1, 1] + 0.05*ratio,
ytop = pos[1, 2]+ 0.05)
}, bg.border = NA)
旋转图像以使其面向圆心也是可能但不容易的,因为rasterImage()
有一个angle
参数允许旋转图像但旋转相对于图像的左下角而不是图像的中心.
编辑:我circos.raster()
在包中添加了一个新功能(版本> = 0.4.1),这使得添加光栅图像更容易。