y轴标题显得太靠近轴文本.
ggplot(mpg, aes(cty, hwy)) + geom_point()
Run Code Online (Sandbox Code Playgroud)

我试过改变许多参数的值,theme()但似乎没有任何帮助.
我想在绘图区域内放置标签。
这是一个示例图:
library(ggplot2)
set.seed(123)
random_word <- function() paste(sample(letters, 10, replace = T), collapse='')
dat <- data.frame(x = replicate(4, random_word()),
y = runif(5*4, 0, 100))
ggplot(dat, aes(x = x, y = y)) +
geom_point() +
coord_flip() +
theme_minimal()
Run Code Online (Sandbox Code Playgroud)
我知道我可以通过geom_text破解来获得我想要的结果:
ggplot(dat, aes(x = x, y = y)) +
geom_point() +
geom_text(data = dat[1:4,],
aes(label=x),
y = 1,
hjust=0, vjust=-1 ) +
coord_flip() +
theme_minimal() +
theme(axis.text.y = element_blank())
Run Code Online (Sandbox Code Playgroud)
对这个问题的评论 [ move axis labels ggplot ] 表明这margin是在当前 ggplot 中执行此操作的非黑客方法,但它似乎没有在绘图区域内移动轴文本。 …