How to round percentage to 2 decimal places in ggplot2

Question

My code produces this graph:

Code:

ggplot(areas, aes(x = RETAILER, y = Difference), label=sprintf("%0.2f", round(areas$Difference, digits = 2))) +
geom_bar(stat = "identity", aes(fill = RETAILER), colour = "black") +
scale_y_continuous("Percentage", labels = percent_format()) +
geom_text(aes(label = paste(Difference * 100, "%"),
              vjust = ifelse(Difference >= 0, -1.5, 1.5))) +
theme_classic()

I have found code to allow the data labels to be positioned correctly above or below each bar, but I cannot seem to get the values to round to 2 decimal places.

I have tried round(areas, 2) and sprintf("%0.2f") among other things, but nothing I try seems to work and I'm sure that I'm missing something simple.

Where am I going wrong?

UPDATE:

With Roland's "encouragement", I have now managed to almost resolve this; the problem now is that I have now lost the percentage signs:

How do I get them back?

Updated code:

ggplot(areas, aes(x = RETAILER, y = Difference)) +
  geom_bar(stat = "identity", aes(fill = RETAILER), colour = "black") +
  scale_y_continuous("Percentage", labels = percent_format()) +
  geom_text(aes(label = sprintf("%0.2f", areas$Difference * 100, "%"),
                vjust = ifelse(Difference >= 0, -1.5, 1.5))) +
  theme_classic()

You define the labels there: `geom_text(aes(label = paste(Difference * 100, "%")`. No rounding there at all. — Roland, Aug 21 '17 at 14:01
@Roland I see you drive a hard bargain(!) I have now figured it out, however the percentage symbols have now disappeared - are you able to assist with this? — Mus, Aug 21 '17 at 14:27
`sprintf("%0.2f %%", Difference * 100)`. Skip the `areas$` if you don't want surprising behavior from ggplot2. — Roland, Aug 21 '17 at 14:31

score 7 · Answer 1 · answered Mar 05 '19 at 08:57

Recent versions of ggplot2/scales packages offer arguments to the scales::percent function, for instance to round percentages to integers:

scale_y_continuous(labels = scales::percent_format(accuracy = 1L))

This is roughly equivalent to round(x, 0L): Note the 1 instead of 0.

Or for two digits:

scale_y_continuous(labels = scales::percent_format(accuracy = 3L))

There is a near-duplicate question. Check Henrik's answer here: How to prevent scales::percent from adding decimal

score 5 · Answer 2 · edited May 17 '20 at 13:40

5

geom_text(label=percent(Difference,.11))

edited May 17 '20 at 13:40

Mus

7,290
24
86
130

answered May 17 '20 at 11:02

user13560350

51
1
1

1

That works. For completeness, I'd probably name the argument just to be safe. i.e., `percent(Difference, accuracy = .11)` – tjebo May 17 '20 at 14:02

score 2 · Answer 3 · edited Mar 05 '19 at 10:40

2

aes(label=paste(round(Difference*100,digits= 2),"%",sep=""))

edited Mar 05 '19 at 10:40

s_baldur

29,441
4
36
69

answered Feb 21 '18 at 19:58

Jitendra Kulkarni

823
6
17

instead of paste(sep=""), you could also use just `paste0` – tjebo May 17 '20 at 13:53

score 0 · Answer 4 · answered Feb 21 '18 at 20:05

I use the percentfunction from formattable within geom_text. So in your case I would do like so:

geom_text(aes(label = formattable::percent(Difference)),
          vjust = ifelse(Difference >= 0, -1.5, 1.5))

you can define digits within percent, but the default is 2, which is what you're looking for. The % symbols remains, like you desire. Plus, you can do stuff with it as it is still numeric underneath and not character like other solutions out there.

How to round percentage to 2 decimal places in ggplot2

4 Answers4

Linked

Related