如何在consort包生成的Consort图中添加图例？

先处理“figure margins too large”错误 #

这个错误多因绘图窗口尺寸不足导致，可通过以下方式解决：

• 手动拉大RStudio的绘图面板，或点击面板的「Zoom」按钮放大窗口后重新运行绘图代码。
• 提前指定绘图设备的尺寸（以PDF为例）：

pdf("consort_plot.pdf", width = 12, height = 8) # 自定义宽高，单位为英寸
plot(fluxo)
# 后续添加图例/文本
dev.off()

正确添加图例或文本的方法 #

你之前的text()报错是因为plot.new()会清空已绘制的Consort图，且无需额外调用该函数，直接在plot(fluxo)后添加元素即可：

方法1：用基础绘图的legend()函数添加 #

绘图完成后直接调用legend()，可指定位置或通过点击获取坐标：

plot(fluxo)
# 直接指定位置，比如右上角
legend(x = "topright", legend = c("分组A", "分组B"), fill = c("red", "blue"))

# 若不确定坐标，用点击获取位置
pos <- locator(1) # 运行后点击绘图区域目标位置
legend(x = pos$x, y = pos$y, legend = c("你的图例内容"), fill = c("对应颜色"))

方法2：构建consort对象时整合图例 #

可以在创建fluxo对象时，添加专门的图例节点：

# 新增图例节点，调整x、y坐标到合适位置
fluxo <- add_node(fluxo, "图例：\n- 分组A：红色\n- 分组B：蓝色", x = 10, y = 1)
plot(fluxo)

额外提示 #

• 不要在plot(fluxo)后调用plot.new()，会清除已绘制的图。
• 若仍有边距问题，可尝试缩小绘图字体：

plot(fluxo, cex = 0.8) # cex参数控制字体大小，小于1为缩小

内容的提问来源于stack exchange，提问作者Ornella Scardua