R,ggplot:y轴上的小数

Luk*_*kas 4 r ggplot2

我想制作一个条形图,类似于这个MWE:

library(tidyverse)
library(ggplot2)

mtcars %>% 
  mutate(mpg=mpg/1000) %>% 
  ggplot(aes(x=cyl, y=mpg)) +
  geom_bar(stat="identity") +
  scale_y_continuous(labels = scales::percent)
Run Code Online (Sandbox Code Playgroud)

我得到的是以下内容(请记住,这是无稽之谈,但用于说明目的): 在此输入图像描述 现在,我希望从y轴上的百分比替换小数("30%"而不是"30.0%").我能做什么?

我在这里发现了一个类似的问题,但无法使该功能NRPercent不起作用(并且不能在那里发表评论).

Axe*_*man 16

使用新版本scales可以使用:

scale_y_continuous(labels = scales::percent_format(accuracy = 1))
Run Code Online (Sandbox Code Playgroud)