r - ggplot中文本的行高间距

我正在尝试减少长轴标签之间的空间。我基于 R 图形我会使用 lheight ，但似乎在 ggplot 中没有影响。有 ggplot 等价物吗？

显示问题的玩具示例:

library("tidyverse")
df0 <- mtcars %>%
  rownames_to_column("car") %>%
  mutate(car = str_wrap(car, width = 10))

ggplot(data = df0, aes(x = car, y = mpg)) +
  geom_bar(stat = "identity") +
  coord_flip()

# has no effect
par(lheight = 0.5)
ggplot(data = df0, aes(x = car, y = mpg)) +
  geom_bar(stat = "identity") +
  coord_flip()

最佳答案

您可能正在寻找多种选择。最接近 lheight 的可能是在 lineheight 中设置 element_text 。我还使字体变小，只是为了显示选项。

ggplot(data = df0, aes(x = car, y = mpg)) +
  geom_bar(stat = "identity") +
  coord_flip() +
  theme(axis.text.y = element_text(lineheight = 0.5,
                                   size = 6))

关于r - ggplot中文本的行高间距，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/39721772/