我正在尝试使用directlabels将标签应用于套索图,如此处所示。我可以将标签放在页面上,但无法更改大小。在列表中传递其他参数允许我更改其他元素,但不能更改文本大小。
require(ggplot2)
require(directlabels)
dat_test <- data.frame(x=1:10, value=c(sin(1:10), cos(1:10), tan(1:10)), fun=rep(c('sin', 'cos', 'tan'), each=10))
p <- ggplot(dat_test, aes(x=x, y=value, group=fun, colour=fun)) + geom_line()
direct.label(p, 'last.qp') # adds labels
direct.label(p, list('last.qp', size=2)) # does not work, same as above
direct.label(p, list('last.qp', rot=30)) # correct rotates text
是否可以更改直接标签的文本大小?