在ggplot2_3.0.0中检索轴标签的值

Question

如何提取下面用于标记ggplot中y和x轴的数字（分别为20, 30, 40和10 , 15 ,20 ,25, 30, 35）？

情节

来自r-statistics.co

可复制的代码

# Scatterplot
theme_set(theme_bw())  # pre-set the bw theme.
g <- ggplot(mpg, aes(cty, hwy))
g + geom_count(col="tomato3", show.legend=F) +
  labs(subtitle="mpg: city vs highway mileage", 
       y="hwy", 
       x="cty", 
       title="Counts Plot")

我尝试查看str(g)的输出，但收效甚微。

Answer 1

基于CPak的答案，ggplot2_3.0.0的结构略有变化。现在可以使用以下方式提取标签：

ggplot_build(g)$layout$panel_params[[1]]$y.labels
#[1] "20" "30" "40" 
ggplot_build(g)$layout$panel_params[[1]]$x.labels
#[1] "10" "15" "20" "25" "30" "35"

Answer 2

扩展较旧的帖子-可以找到它们

ggplot_build(g)$layout$panel_ranges[[1]]$y.labels
# "20" "30" "40"
ggplot_build(g)$layout$panel_ranges[[1]]$x.labels
# "10" "15" "20" "25" "30" "35"

编辑：只能与ggplot2_2.2.1一起使用，但不能与ggplot2 version 3.0.0一起使用-感谢zx8754和nilambara指出了这一点