同样的代码
ggplot(titanic[!is.na(titanic$Survived),], aes(x = Survived, fill = Survived)) +
      geom_bar(stat='count') +
      labs(x = 'How many people died and survived on the Titanic?') +
      geom_label(stat='count',aes(label=..count..), size=7) +
      theme_gray(base_size = 15)

别人能做出这样的图
而我的图是这样的

图例和颜色都不一样，应该如何修改呢？