r - 更改ggplot中x轴的比例

Question

我有一个 ggplot 条，不知道如何更改 x 轴的比例。目前它看起来如下图所示。但是，我想重新排列 x 轴的比例，以便 21% 条高于 7% 条。我怎样才能得到 % 到轴？提前致谢！

df= data.frame("number" = c(7,21), "name" = c("x","y"))
df
ggplot(df, aes(x=name, y=number)) + 
  geom_bar(stat="identity", fill = "blue") + xlab("Title") + ylab("Title") + 
  ggtitle("Title") 

标签： rggplot2

Answer 1

在几何图中使用prop.table函数来输入 y 变量。

ggplot(df, aes(x=name, y=100*prop.table(number))) + 
  geom_bar(stat="identity", fill = "blue") + 
  xlab("Stichprobe") + ylab("Paketmenge absolut") + 
  ggtitle("Menge total")  

如果您想在 y 轴上有字符 %，您可以添加scale_y_continuous到图中，如下所示：

library(scales)

ggplot(df, aes(x=name, y=prop.table(number))) + 
  geom_bar(stat="identity", fill = "blue") + 
  xlab("Stichprobe") + ylab("Paketmenge absolut") + 
  ggtitle("Menge total") + 
  scale_y_continuous(labels=percent)