如何绘制geom_col（）以使y轴以1为中心而不是0

作者: 没身份别烦我
发布时间: 2025-01-13 12:09:53 (7天前)
转自：

2 条回复

0#
回复此人
荧惑 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 您可以预处理y值，使绘图实际从0开始，然后更改比例标签以反映原始值（使用内置数据集进行演示）： </p> <pre> <code> library(dplyr) library(ggplot2) cut.off = 500 # (= 1 in your use case) diamonds %>% filter(clarity %in% c("SI1", "VS2")) %>% count(cut, clarity) %>% mutate(n = n - cut.off) %>% # subtract cut.off from y values ggplot(aes(x = cut, y = n, fill = cut)) + geom_col() + geom_text(aes(label = n + cut.off, # label original values (optional) vjust = ifelse(n > 0, 0, 1))) + geom_hline(yintercept = 0) + scale_y_continuous(labels = function(x) x + cut.off) + # add cut.off to label values facet_grid(clarity ~ .) </code> </pre> <P> <a href="https://i.stack.imgur.com/hDu6j.png" rel="nofollow noreferrer"> <img src =“https://i.stack.imgur.com/hDu6j.png”alt =“plot”/> </A> </p> </DIV>

编辑

登录后才能参与评论