r - x 或 y 轴标签中的千位分隔符

Question

我想在 y 轴上有漂亮的标签。例如，我更喜欢 1,000 而不是 1000。如何在 ggplot 中执行此操作？这是一个最小的例子:

x <- data.frame(a=c("a","b","c","d"), b=c(300,1000,2000,4000))
ggplot(x,aes(x=a, y=b))+
               geom_point(size=4)

感谢您的任何提示。

Answer 1

与 scales包，一些格式选项变得可用:逗号、美元、百分比。
请参阅 ?scale_y_continuous 中的示例.

我认为这可以满足您的要求:

library(ggplot2)
library(scales)

x <- data.frame(a=c("a","b","c","d"), b=c(300,1000,2000,4000))

ggplot(x, aes(x = a, y = b)) + 
  geom_point(size=4) +
  scale_y_continuous(labels = comma)