以不重叠的方式调整geom_points（）的大小

Question

我在r。

中使用以下代码创建了几个热图

for(i in 1:length(pdi_levels))   {

p <- ggplot(pdi_tasa_mean_lps_filter %>% filter(inst_finan == pdi_levels[i]), 
            aes(x = emision_mes, y = institucion)) +
     geom_point(size = 10, aes(colour = porcentaje)) +
     geom_text(aes(x = emision_mes, y = institucion, label = porcentaje), color = "white", size = 2) +
     theme_bw() +
     facet_wrap(~emision_anio, scales = "free") +
     scale_color_gradient(low = "pink", high = "red")

print(p)
}

以下是我的两张热图的示例。

我的问题是，点（圆圈）相互重叠，但是，如果我要在函数geom_point()

中指定size参数

geom_point(size = X, aes(colour = porcentaje)) 

每个主轴之间的距离，圆圈完全吻合。

我的问题是：

如何获得每个主轴之间的距离？ 有没有其他方法可以使圆圈不重叠？

corrplot包不是一个选项。