我想用下面的代码在情节的最后一个方面注释一些文本:
library(ggplot2)
p <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
p <- p + facet_grid(. ~ cyl)
p <- p + annotate("text", label = "Test", size = 4, x = 15, y = 5)
print(p)
但这段代码在每个方面都对文本进行了注释.我怎样才能只从一个方面获得注释文本?
我想用下面的代码在情节的最后一个方面注释一些文本:
library(ggplot2)
p <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
p <- p + facet_grid(. ~ cyl)
p <- p + annotate("text", label = "Test", size = 4, x = 15, y = 5)
print(p)
但这段代码在每个方面都对文本进行了注释.我怎样才能只从一个方面获得注释文本?
通常你会这样做:
ann_text <- data.frame(mpg = 15,wt = 5,lab = "Text",
cyl = factor(8,levels = c("4","6","8")))
p + geom_text(data = ann_text,label = "Text")
它应该在不完全指定因子变量的情况下工作,但可能会引发一些警告: