改变R中的绘图颜色

Question

我是R的新手。我有一个情节的代码如下，但我不知道如何更改条形图的颜色。在传奇部分，我也想用头痛取代颜色。我还需要将y轴上的标签更改为“频率”。我该怎么办？

library(tidyverse)

dat= data_frame(rating=1:5, headache=c(167,82, 132, 182, 200), No_headache=c(28, 22, 20, 27, 29))
dat = dat %>%
  gather(key=color, value=value, -rating)
ggplot(data=dat, aes(x=rating, y=value, fill=color)) + 
  geom_bar(stat='identity', position='dodge')