R 如何找到百分比频率gg图

这里有几个问题，询问如何绘制百分比频率。我已经尝试实施这些建议，但仍然有困难

我有以下向量：

var <- c(2,2,1,0,1,1,1,1,1,3,2,3,3,5,1,4,4,0,3,4,1,0,3,3,0,0,
     1,3,2,6,2,2,2,1,0,2,3,2,0,0,0,0,3,2,2,4,3,2,2,0,4,1,0,1,3,1,4,3,1,2,
     6,7,6,1,2,2,4,5,3,0,6,5,2,0,7,1,7,3,1,4,1,1,2,1,1,2,1,1,4,2,0,3,3,2,2,2,5,3,2,5,2,5)

---

var您可以做的一件事是在绘制图形之前进行计算。但是，如果我遵循你的方法，你会想要这样的东西

ggplot(df, aes(x=x)) +
    geom_bar(aes(y = N/sum(N)), stat="identity", width=1.0, 
    colour = "dark green", fill = 'paleturquoise4') +
    ylab("y")


p <- ggplot(df, aes(x=x, y= N)) +
     geom_bar(
     aes(y = (..count..)/sum(..count..)),
     stat="identity", width=1.0, 
     colour = "darkgreen",
     fill = 'paleturquoise4'
  )

ggplot(df, aes(x=x)) +
    geom_bar(aes(y = N/sum(N)), stat="identity", width=1.0, 
    colour = "dark green", fill = 'paleturquoise4') +
    ylab("y")