如何在 R 中沿直线或曲线书写文本？ [复制]

Question

我有一个数据集，我正在尝试使用lm() 拟合一个线性模型。这部分是直截了当的。

我还可以使用abline( lm( x ~ y ) ) 将此拟合绘制成散点图。

但是现在想顺着线写下拟合的参数如adjusted r-squared。
因此，如果我悬停绘制不同的数据集及其各自的拟合，我应该能够打印一些沿线拟合的值。

是否可以在 R 中做到这一点。

Answer 1

是的，直线很容易做到，曲线更复杂，等宽字体可能更简单。基本技术就是转换你的线性方程，这样你就可以推导出一个带有角度的极坐标表达式。使用该角度来设置 text 命令中文本的角度，使用 srt 参数（来自图形参数）。

对于曲线，它会有点棘手（可能通过非比例字体简化）。你需要为每个字母计算出一个角度的向量，然后是每个字符的宽度（使用strwidth）。你会为你的角色生成一个角度和位置的向量，然后循环调用text。这里需要一个循环，因为 text 不能为 srt 参数获取向量。