如何在R中的28个多图案例中添加注释？
如何在R中的28个多图案例中添加注释？
提问于 2017-06-29 07:03:24
我有一个包含28个情节的空平台：：
par(mfcol = c(7, 4), mar = rep(.1, 4), oma = rep(5, 4))
lapply(1:28, plot, t = "n", xaxt = "n", yaxt = "n")问题
我想知道如何将下面显示的所有注释添加到我的going):上面的28块图的空平台(，演示如何添加这些注释的几个示例)，这将使我获得
回答 1
Stack Overflow用户
回答已采纳
发布于 2017-06-29 08:12:07
这些注释对我来说总是很挑剔，但首先：
par(mfcol = c(7, 4), mar = rep(.1, 4), oma = rep(10, 4))
lapply(1:28, plot, t = "n", xaxt = "n", yaxt = "n")
l <- rep('Very Strong\n23%', 7)
at <- seq(grconvertY(0 + (1 / 14), "nic"), grconvertY(1 - (1 / 14), "nic"), l = 7)
mtext(l, 4, at = at, las = 1, line = 1)所以这里棘手的部分是坐标，对于mtext，它被定义为用户坐标。不过，我们可以将nic坐标转换为grconvertX和grconvertY的用户坐标。这些是“归一化的内区域坐标”，范围从0到1。所以对于面板中间的7个数字，我们需要一个从0 + (1 / 14)到1 - (1 / 14)的序列。您可以对其他文本使用类似的逻辑。
添加更多的mtext调用将给您带来很大的帮助。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/44818419
复制相关文章
相似问题
腾讯云开发者
