在 ggplot2 中編輯圖例值

Question

我有如下圖所示。 它是使用以下命令創建的：

popanim <-  ggplot(data =  pop2, aes(
  x = age1,
  y = ifelse(gender == 1, -pop_rel, pop_rel),
  fill = gender, 
  group = district
)) +
  geom_col() +
  # facet_wrap( ~ country) +
  coord_flip() +
  transition_states(district, transition_length = 2, state_length = 1) +
  labs(title = 'district: {closest_state}')+
  xlab("age") + ylab("population") #HERE


anim_pop <- animate(popanim, nframes = 50, renderer = gifski_renderer("gganimate.gif"))

anim_save(anim_pop = anim_pop, filename ="//pyramidd.gif")

現在我要做的下一件事是將圖例值從 1 修改為male ，將 2 修改為female

我試過scale_fill_discret但它不起作用

Answer 1

你可以做scale_fill_discrete(labels = c("Male", "Female")) 。 在這里，我展示了一個可重現的示例，因為您尚未提供可重現的數據（始終推薦）：

library(ggplot2)
ggplot(mtcars, aes(hp, mpg, fill = factor(cyl))) +
        geom_col() +
        coord_flip() +
        scale_fill_discrete(labels = c("Male", "Female", "Other"))