ggplot2 - 使用 Facet 注释中的文本和数学
ggplot2 - Text and Math in Annotation with Facet
我正在尝试在多面图中用单位 (m^2/ha) 标记平均 y 值
在情节的注释中。
已经为轴标签和条带标签提供了答案，或者只为没有文本的数学提供了答案，但这些答案不适用于注释。
library(ggplot2)
my.df <- data.frame(grp=c("A", "A", "B", "B"), x=c(1,2,1,2),y=c(3,5,6,8))
my.avg <- data.frame(grp=c("A", "B"), mean=c(4,7))
p1 <- ggplot(my.df, aes(x, y)) + geom_point() + facet_wrap(~grp)
p1 <- p1 + geom_text(data=my.avg, aes(x=1.5, y=7, label=paste("Avg =", mean, "m2/ha")))
p1
其中 m2/ha 带有上标。
我可以让它在没有 "Avg =".
的情况下工作
我试过 expression()，但它在这种特殊情况下不起作用。
这里的正确功能是什么？
尝试
geom_text(data=my.avg, aes(x=1.5, y=7, label=paste("Avg ==", mean, "*m^2/ha")), parse=TRUE)
我正在尝试在多面图中用单位 (m^2/ha) 标记平均 y 值 在情节的注释中。
已经为轴标签和条带标签提供了答案，或者只为没有文本的数学提供了答案，但这些答案不适用于注释。
library(ggplot2)
my.df <- data.frame(grp=c("A", "A", "B", "B"), x=c(1,2,1,2),y=c(3,5,6,8))
my.avg <- data.frame(grp=c("A", "B"), mean=c(4,7))
p1 <- ggplot(my.df, aes(x, y)) + geom_point() + facet_wrap(~grp)
p1 <- p1 + geom_text(data=my.avg, aes(x=1.5, y=7, label=paste("Avg =", mean, "m2/ha")))
p1
其中 m2/ha 带有上标。
我可以让它在没有 "Avg =".
的情况下工作
我试过 expression()，但它在这种特殊情况下不起作用。
这里的正确功能是什么？
尝试
geom_text(data=my.avg, aes(x=1.5, y=7, label=paste("Avg ==", mean, "*m^2/ha")), parse=TRUE)