在下面的示例中,是否有可能左右对齐由geom_label_repel
(或geom_text_repel
)创建的文本标签,其中所有文本的值均为nudge_x
,且仅在direction
参数中调整了y位置?目前,默认行为是将文本居中对齐:
library(ggplot2)
library(ggrepel)
ggplot(mtcars, aes(x=factor(gear), y=mpg, colour=factor(gear))) +
geom_point(size=3) +
facet_wrap(~cyl, labeller=label_both) +
scale_x_discrete(expand=c(0, 1.5)) +
geom_label_repel(aes(label=rownames(mtcars)),
size=3, segment.size=0.25, nudge_x=0.5, direction="y")
我希望通过设置geom_label
来模拟geom_text
(或hjust=0
)中的左对齐,如下例所示,同时能够自动排斥标签y方向:
ggplot(mtcars, aes(x=factor(gear), y=mpg, colour=factor(gear))) +
geom_point(size=3) +
facet_wrap(~cyl, labeller=label_both) +
scale_x_discrete(expand=c(0, 1.5)) +
geom_label(aes(label=rownames(mtcars)), size=3, nudge_x=0.2, hjust=0)
编辑:作为一个黑客,是否有可能将gjust(和vjust)构建到ggrepel中?