ramen_ggplot2.R

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 = "yihong")

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

#泡麵_包裝盒狀圖
ggplot(ramen, aes(x = Style, y= Stars , fill= Style))+
  geom_boxplot()+
  labs(x= "包裝", y= "喜好", title = "ramen盒狀圖geom_boxplot", subtitle = "yihong")

## Warning: Removed 2 rows containing non-finite values (`stat_boxplot()`).

#泡麵_包裝直方圖
ggplot(ramen, aes(x = Stars, fill= Style))+
  geom_histogram()+
  labs(x= "喜好",y = "數量", title = "ramen 直方圖geom_histogram", subtitle = "yihong")

## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

## Warning: Removed 2 rows containing non-finite values (`stat_bin()`).