移动所有直接标签

时间:2012-03-14 03:13:13

标签: r ggplot2

我今天第一次使用直接标签,因为这是一个新包,文档仍然很稀疏。我创建了一个类似于这个数据的刻面密度图,标签可以向上和向右移动。

如果这是mtext我可以使用adjpadj移动文本。我如何对下面的标签做同样的事情。将每个标签略微上移并略微向右移动?

library(directlabels); library(ggplot2)
g <- ggplot(CO2, aes(x=conc, group=Type))
h <- g + geom_density(aes(colour=Type)) +facet_grid(Treatment~.)
direct.label(h)

这是最后一点,直到我有一个数字准备出版,所以非常感谢这里的帮助。

编辑 top.bumptwice无法完全移动文本。我希望能够更好地控制此举。

1 个答案:

答案 0 :(得分:1)

我问作者,您可以将这些动作作为列表传递给direct.labels

library(ggplot2); library(directlabels)
x <- ggplot(CO2, aes(x=uptake, group=Plant))
y <- x + geom_density(aes(colour=Plant)) + 
    facet_grid(Type~Treatment)+ theme_bw()
y 


my.method1 <- list('top.points',dl.move("Qn1",  hjust=0,vjust=-5) 
)


direct.label(y, my.method1)