长条图标注数值

Tagged: 

该主题包含 1 条回复,1个帖子,最后由  shellimayyy5 天, 15 小时 之前 更新。

查看 2 个帖子 - 1 到 2(总计 2 个)
  • 作者
    帖子
  • 1 楼

    shellimayyy
    Participant

    想要再堆叠长条图的bar上标注数值,
    希望呈现的结果是
    举例:在x轴的 (51~60)bar,上方蓝色标注0.33,下方红色标注0.67,数值在bar的正中央

    目前手上有的数据如下:

    store	type	age
    店1	晚	21~30
    店1	晚	21~30
    店1	晚	61~70
    店1	晚	61~70
    店1	早	0~20
    店1	早	51~60
    店1	早	51~60
    店1	早	61~70
    店1	早	21~30
    店1	晚	0~20
    店1	早	31~40
    店1	早	61~70
    店1	晚	21~30
    店1	晚	51~60
    店1	早	21~30
    店1	早	61~70
    店1	晚	41~50
    店1	早	61~70
    店1	早	21~30
    店1	早	61~70
    

    已完成代码如下:

    ggplot(dat[which(dat$store == "店1"),], aes(age, fill = type)) + 
      geom_bar(position="fill", width = 0.5) + 
      theme_bw() + 
      scale_y_continuous(breaks = c(0,0.2,0.4,0.6,0.8,1), labels = c("0%","20%","40%","60%","80%","100%")) + 
      ylab("") + xlab("") +
      theme(axis.text.x = element_text(size = 15),
            axis.text.y = element_text(size = 15),
            legend.text = element_text(size = 15),
            legend.key = element_blank(), 
            legend.title = element_blank())  
    2 楼

    shellimayyy
    Participant

    已完成 :-)

查看 2 个帖子 - 1 到 2(总计 2 个)

您必须先登录才能回复该主题。