错误：stat_count（）不能与y美学一起使用

Question

我正在尝试绘制一个条形图，以显示不同植物油的脂肪成分。我尝试在y轴上绘制油的类型，在x轴上绘制脂肪的量，以便将每种类型的脂肪彼此相邻放置。尝试输入的代码：

ggplot(fats, aes(x=Fats, y=Oil, fill=Type))+
  geom_bar(position = "fill")

没有给出结果，错误是

Error: stat_count() must not be used with a y aesthetic.

然后我尝试仅插入x轴，但效果不佳。

ggplot(fats, aes(x=Oil, fill=Type))+
   geom_bar(position = "fill")

给了我下面的情节

Unsuccessful Plot

我期望的更像是

Expected plot

数据如下

df <- structure(list(row = 1:19, oil = structure(c(4L, 4L, 4L, 6L, 
6L, 6L, 3L, 3L, 3L, 3L, 5L, 5L, 5L, 2L, 2L, 2L, 1L, 1L, 1L), .Label = c("Coconut", 
"Palm", "Peanut", "Rapeseed", "Rice", "Sunflower"), class = "factor"), 
    fat = c(8L, 64L, 28L, 11L, 20L, 69L, 17L, 46L, 32L, 5L, 25L, 
    38L, 37L, 51L, 39L, 10L, 87L, 13L, 0L), type = structure(c(4L, 
    1L, 3L, 4L, 1L, 3L, 4L, 1L, 3L, 2L, 4L, 1L, 3L, 4L, 1L, 3L, 
    4L, 1L, 3L), .Label = c("Monounsaturated", "Other", "Polyunsaturated", 
    "Saturated"), class = "factor")), class = "data.frame", row.names = c(NA, 
-19L))

##> df
##    row       oil fat            type
## 1    1  Rapeseed   8       Saturated
## 2    2  Rapeseed  64 Monounsaturated
## 3    3  Rapeseed  28 Polyunsaturated
## 4    4 Sunflower  11       Saturated
## 5    5 Sunflower  20 Monounsaturated
## 6    6 Sunflower  69 Polyunsaturated
## 7    7    Peanut  17       Saturated
## 8    8    Peanut  46 Monounsaturated
## 9    9    Peanut  32 Polyunsaturated
## 10  10    Peanut   5           Other
## 11  11      Rice  25       Saturated
## 12  12      Rice  38 Monounsaturated
## 13  13      Rice  37 Polyunsaturated
## 14  14      Palm  51       Saturated
## 15  15      Palm  39 Monounsaturated
## 16  16      Palm  10 Polyunsaturated
## 17  17   Coconut  87       Saturated
## 18  18   Coconut  13 Monounsaturated
## 19  19   Coconut   0 Polyunsaturated

Answer 1

也许像这样...

代码：

ggplot(fats,aes(x=Oil,y=value,fill=Type))
+geom_col()
+coord_flip()
+scale_y_discrete(name="percentage or something")
+theme(axis.text.x = element_blank(),axis.ticks.x =  element_blank(),panel.grid= element_blank())