R十进制逗号而不是ggplot scales :: percent中的小数点

问题描述

我一直试图让 R 在我的绘图的百分比标签中打印 , 而不是 .，但它不适用于我目前找到的任何方法。我怀疑运行

format(data,decimal.mark=",") 或 options(OutDec= ",") 可能不起作用，因为我请求从 label=scales::percent(Prozent/100) 打印百分比。我曾尝试使用某种 paste(Prozent+"%") 作为解决方法，但重点仍然存在。 :(

plot <- ggplot(probleme,aes(x=reorder(Name,Häufigkeit),y= Häufigkeit,fill = mean)) +
          geom_col(position="dodge") +
          coord_flip() + 
          scale_fill_gradient(low = "#FEDFE8",high = "#AC0634",limits=c(6,8),breaks = c(6,7,8))+
          scale_y_continuous(limits = c(0,1650),expand = c(0,0.1))+
          scale_x_discrete(expand = c(0,0)) + 
          geom_text(aes(label=scales::percent(Prozent/100)),position = position_dodge(0.5),hjust = -0.02,colour = "black",size=5)

我可以在代码中的哪个位置指定我想要一个十进制逗号？ 任何帮助将不胜感激:) 谢谢

解决方法

将 decimal.mark = "," 添加到您的 geom_text() 命令以修改逗号符号。

geom_text(aes(label=scales::percent(Prozent/100,decimal.mark = ",")),position = position_dodge(0.5),hjust = -0.02,colour = "black",size=5)