r - ggplot2 中的 geom_text() 大小定义

Question

我正在尝试改变 ggplot 中 geom_text() 层的大小，以便标签始终比给定范围窄。范围在数据中定义，但我不知道如何在不进行大量试验和错误的情况下将标签缩放到比这更窄。

我希望我可以构造一个标签大小和 nchar(label) 的函数(实现字符宽度略有不同)，它会返回一个宽度，我可以将其与形状宽度进行比较，并缩小直到不再需要。

ggplot 标签大小是否定义为像素数、绘图高度的百分比或其他类似的东西？

Answer 1

这是一个有用的起点吗？ (如果不是请随时删除我的帖子)。您将范围添加到 ranges = rnorm(foo, 5, 1)。

library(ggplot2)
library(directlabels)

set.seed(67)
foo <- 8
df <- data.frame(x = rnorm(foo, 1, .5), y=rnorm(foo, 1, .5), ranges = rnorm(foo, 5, 1), let=letters[1:foo])

p <- ggplot(df, aes(x, y, color=let)) + geom_point()  + scale_colour_brewer(palette=5)
direct.label(p, 
    list("top.points", rot=0, cex=df[,3], 
          fontface="bold", fontfamily="serif", alpha=0.8))