使用R中的DrawPedigray绘制谱系面板图

我试图将多个谱系绘制成一个图形。我原以为在使用该函数时，下面生成一个带有两个（在本例中是相同的）谱系的1 x 2面板图形，因为我指定了

par（mfrow=c（1,2））

，但这只给出了一个谱系。也许

drawPedigree

函数会产生一些与绘图不同的处理方式。如何强制R在一个PNG文件中并排生成两个谱系

library("pedantics")
data(gryphons)
ped1 <- fixPedigree(gryphons[,1:3])
ped2 <- ped1
png("C:\\Users\\ell\\Dropbox\\temp.png", width = 360, height = 180, units = "mm", res = 1000)
par(mfrow = c(1,2))
drawPedigree(ped1)
drawPedigree(ped2)
dev.off()

library（“学究”）
数据（鹰头狮）
PED1似乎在函数>代码>拖曳谱系< /代码>中重置PAR。找不到它。数据图非常密集，很难一分为二。在最坏的情况下，IfimeGigk可能会完成这项工作。似乎函数正在重置函数<代码>拖曳谱系< /代码>中的PAR。找不到它。数据图非常密集，很难一分为二。在最坏的情况下，imagemagick可能会完成这项工作。