将直接标签稍微向左移动答案

【问题标题】：Moving directlabels slightly to left将直接标签稍微向左移动
【发布时间】：2013-07-24 15:58:23
【问题描述】：

我正在尝试将我的直接标签稍微向左移动，而不是一组，而是所有组。默认情况下 dl.move 一次只移动一个组。

library(directlabels)
library(ggplot2)

count <- c(1,5,6,7,8,8)
year <- c(rep(c(2000,2001,2002),2))
group <- c(rep("A",3),rep("B",3))
c <- data.frame(year,count,group)

p <- ggplot(c, aes(x=year, y=count, colour=group)) + geom_line()

direct.label(p, "first.points")

我可以用...移动一点

kif <- dl.move("A", hjust=2, vjust=0)
direct.label(p, list("first.points",kif))

但理想情况下，我只想将整个事情移到 a 上。是否有一些我完全错过的愚蠢语法？

【问题讨论】：

标签： r charts ggplot2 graphing direct-labels

【解决方案1】：

dl.trans(x=x-0.1) 将所有内容向左移动 0.1 厘米。

direct.label(p, list(dl.trans(x=x-0.1), "first.qp"))

【讨论】：

谢谢。我知道我的不正常，因为动作不成比例。

【解决方案2】：

找到了。一个简单的

direct.label(p, list("first.points",hjust=2, vjust=0))

不完美但有效，间距不像默认值那样均匀。

【讨论】：