简短版本:我如何使这个人为的代码绘制出正确的希腊 beta 字符和标签字符串的其余部分,以及空格和小于字符以及格式化为键入的数字?
library("ggplot2")
df<-data.frame(a=1:15,b=6:20)
ggplot(data=df, aes(x=a,y=b)) + geom_point() +
geom_text(x=5,y=4,label="beta=1.00 p<0.0001", parse=TRUE)
如果我省略“, parse=TRUE”参数,该字符串效果很好,但不会给我一个真正的希腊语测试版。如果我把它留在里面,一切都会崩溃。
<小时/>长版本(以及为什么我找不到重复的版本):我终于在 How to use Greek symbols in ggplot2? 中发现了在 ggplot 上放置希腊字符的方法取决于您放置它们的位置。由于我使用 geom_text 将文本字符串强制到图的主体上,因此我使用表达式(beta)的尝试失败了,并且我最近开始使用上面提到的解析参数。我遇到了How can I add alpha-numeric AND greek characters to geom_text() in ggplot? ,我认为这是我的答案,但修复“空格”会导致弹出额外的括号,“=”被逗号替换,并且我之前格式化的所有文本数字的格式都会丢失。
使用 parse 参数的指南的链接,以及如何理解在我看来完全不直观的内容对我非常有帮助,可能 future 的 R 用户也会在这里结束。许多搜索都没有结果。
最佳答案
这应该可以做到:
g <- ggplot(data=df, aes(x=a,y=b)) + geom_point()
g + annotate("text", x=5,y=4,parse=TRUE, label="beta==1.00 * ' p<0.0001'")
只需将带有单引号的标签拆分到空白一侧,并使用 *
连接两个标签位即可。您还需要 ==
表示等于。
关于r - 通过 R 中的 geom_text 将小于符号 "<"添加到 ggplot,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/28666794/