我正在尝试使用R函数在基础layout()中创建高度自定义的图形，但是当我尝试插入带有自定义边距的图时，我遇到了缩放问题。
简而言之，我有一个名为vis.data的数据框，其中包含有关各种各样的全球世界信仰的信息（此处称为primals）以及有关其政党关系的信息（{ {1}}）。我的目标是编写一个功能，自动可视化各政党之间信仰的差异（democrats = "dems"; independents = "indeps"; republicans = "reps"）。
我已经解决了这个函数中的大部分问题，但是默认的绘图设置会产生边距过大的图，这会产生最终的图形
（a）包含的空白空间比我想要的多;和
（b）使图中较小的图形难以阅读。
不幸的是，当我尝试修补这些图上的边距时，它会干扰vis_by.party的功能，导致不均匀尺寸的图形。
我希望有人可以帮我调整图形中小块图的边距（即左侧的三个图），同时仍然确保这些图最终形成一致的大小。
我的函数的完整代码如下，以及函数的输出（导出为图像）首先使用自定义边距，然后没有。我想要实现一个最终产品，它将图形的大小与默认边距相结合，但其间距/缩放类似于左上图（“民主党中的美丽”）中的自定义边距。
用于生成这两个图形的代码之间的唯一区别是，在创建具有自定义边距的图形时包含以layout()开头的三行，并在创建具有默认边距的图形时注释掉。 / p>
par(mai=c(...))
