随便画一个百分比堆积柱状图

随便画一个百分比堆积柱状图

活不多说直接上代码:

library('ggplot2') #加载所需的包
data.diet <- data.frame(fre = c(7,71,33,45), diet = c('Omnivore', 'PlantSeed', 'Omnivore', 'PlantSeed'), beh = c('L', 'L', 'S', 'S')) #创建数据,这是某一物种的食性数据
ggplot(data.diet, aes(diet, fre, fill = beh))+
  geom_bar(stat = 'identity', position = 'fill', width = 0.7)+
  labs(x = 'Diet', y = 'Frequency (%)', fill = 'Food Hoarding Behavior')+
  theme(legend.position = 'right',
        panel.grid = element_blank(),
        panel.background = element_blank(),
        panel.border = element_rect(fill = NA, size = 1),
        axis.title = element_text(size = 14),
        axis.text = element_text(size = 12))+
  scale_fill_manual(values = c('#003371', '#f35336'),
                    labels = c('Larder hoarding', 'Scatter hoarding'))

最后得到的图是这样的:
在这里插入图片描述

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值