scale_color_gradient2将文本舍入

Question

我正在使用scale_fill_gradient2()，并且创建的颜色栏显示小数位。我试图重现显示小数的文本，但不能，但下面的文字是科学记数法。

如何使用scale_fill_gradient2()对彩色栏中显示的数字进行舍入？例如，我看到“25.00”，我想只显示“25”？

另外如何手动设置标签？假设我想查看数据并设置c(15, 25, 40)等标签？

library(ggplot2)
dat <- data.frame(group = c(rep("A", 10), rep("B", 10)),
                  value = c(rnorm(10, 5,300), rnorm(10, 5000, 80000)))

ggplot(dat, aes(x = group, y = value, fill= value)) + 
       geom_bar(stat = "identity") +
       scale_fill_gradient2(low = "red", mid = "yellow", high = "blue", midpoint = 0, name = "")

Answer 1

您可以根据需要手动指定符号和标签。

ggplot(dat, aes(x = group, y = value, fill= value)) +
  geom_bar(stat = "identity")+
  scale_fill_gradient2(low = "red", mid = "yellow", high = "blue", 
                       midpoint = 0, name = "",
                       breaks = c(0, 1e5, 2e5),
                       labels = c("0", "100,000", "200,000"))