How to add trailing zeros for cents and a dollar sign ($) to the Y-axis using ggplot2?

user_10226014 0
Viewed 175

I would like to have dollar amounts on the y-axis with a dollar sign ($) and 2 trailing zeros to indicate cents (for example, $1.00).

I have the following code and the resultant plot.

library(ggplot2)
library(scales)
df <- data.frame("x" = c("A1",
                         "A2",
                         "A3"),
                 "y" = c(0.77,5.42,8.06))

ggplot()+
  geom_bar(data=df, aes(x, y), stat="identity")+
  theme_minimal()+
  scale_y_continuous(minor_breaks = seq(0 , 9, 1.00),
                     breaks=c(seq(0,9,1.00)),label=dollar, 
                     expand = c(.01, 0), limits = c(0, 9))

enter image description here

ggplot2 r
2 Answers

It appears you're already using the scales package for dollar, there is also a dollar_format function made for this.

ggplot()+
  geom_bar(data=df, aes(x, y), stat="identity")+
  theme_minimal()+
  scale_y_continuous(minor_breaks = seq(0 , 9, 1.00),
                     breaks=c(seq(0,9,1.00)),label=dollar_format(accuracy=0.01), 
                     expand = c(.01, 0), limits = c(0, 9))

enter image description here

(If you look at the source for dollar_format, it's effectively just a mechanism to set arguments for dollar (e.g., accuracy, scale, prefix) and have that return something appropriate for label=, as in a function.)

user_33582720

You can use sprintf to format y-axis :

library(ggplot2)

ggplot()+
  geom_bar(data=df, aes(x, y), stat="identity")+
  theme_minimal()+
  scale_y_continuous(minor_breaks = seq(0 , 9, 1.00),
                     breaks=c(seq(0,9,1.00)),
                     label= function(x) sprintf('$%.2f', x)
                     expand = c(.01, 0), limits = c(0, 9))

enter image description here

user_39629140
Related