load(file = "ramen.RData")
library(ggplot2)
## Warning: 套件 'ggplot2' 是用 R 版本 4.2.3 來建造的
ggplot(ramen, aes(x = Style, fill=Style ))+
  geom_bar()+
  labs(x= "包裝", y= "數量", title = "ramen長條圖geom_bar", subtitle = "Lily")

ggplot(ramen, aes(x = Country, fill=Style ))+
  geom_bar()+
  labs(x= "包裝", y= "數量", title = "ramen長條圖geom_bar", subtitle = "Lily")

ggplot(ramen, aes(x = Style, y=Stars,fill=Style ))+
  geom_boxplot()+
  labs(x= "包裝", y= "數量", title = "ramen盒狀圖geom_bar", subtitle = "Lily")
## Warning: Removed 2 rows containing non-finite values (`stat_boxplot()`).

ggplot(ramen, aes(x = Country, y=Stars,fill=Style ))+
  geom_boxplot()+
  labs(x= "包裝", y= "數量", title= "ramen直方圖geom_bar", subtitle = "Lily")
## Warning: Removed 2 rows containing non-finite values (`stat_boxplot()`).