maptools包中的pointLabel()可以利用模拟退火算法或者遗传算法来解决图中文本标签的重叠问题。R本身提供了度量文本高度和宽度的函数strwidth()和strheight(),因此标签的放置问题本质上就是一个最优化问题,目标函数是标签所占矩形之间重叠面积之和,参数是标签的摆放位置(例如矩形的顶点坐标),问题就是求得参数使目标函数最小化。pointLabel()采用了模拟退火算法和遗传算法,另外,plotrix包中的thigmophobe.labels()利用简单的距离计算可以得出标签摆在点的下、左、上、右哪一面可以使得重叠最小化。以下是前面“用R画中国地图并标注城市位置”一文中曾经用到的例子,这里我们用pointLabel()添加标签:

相比之下,thigmophobe.labels()的功能就差一些了:

赞赏
作为一名没有固定工作的自由职业者,我非常感谢您通过捐赠的方式来支持我的写作和开源软件开发。当然,捐赠纯属自愿。无论金额多少,都是一片诚挚的心意。支付方式如下:
| 微信 | ← 奋力支开它俩 → | 支付宝 |
|---|---|---|
![]() |
其它爱心通道 ↓ Venmo: @yihui_xie Zelle: xie@yihui.name PayPal: xie@yihui.name |
![]() |
若使用 Venmo/Zelle/Paypal,请添加备注“gift”或“donation”,以免捐赠被视为我的可税收入。若使用 Paypal,支付类型请选 Family and Friends,而不要选 Goods and Services。
在不影响生活的前提下,我会将收到的捐赠以尽量大的比例回馈给开源社区和慈善机构。作为参考,2024-25 年间我共收到约三万美元捐赠,完税后我转手捐出了一万五千美元。

