ggplot2 从绝对值中获取条形图

问题描述

嘿,我有以下代码

t<- rep(c(1,2,4,8,16,24,32),4)
y1 <- c(1,1.99,4.01,7.94,15.98,23.74,27.17)
y2 <- c(1,7.98,15.92,23.77,30.37)
y3 <- c(1,2.01,4.04,8.12,16.19,24.03,31.14)
y4 <- c(1,1.96,3.81,6.46,9.81,10.26,9.15)
total <- c(y1,y2,y3,y4)
rel.df <- data.frame(color=rep(c("a","b","c","d"),each=7),t,total)
ggplot(rel.df,aes(x=t,y = total,fill = color)) +
  geom_bar(position = "dodge",stat ="identity",width=0.5) 

我想绘制一个条形图,将我的每个 ys 显示为关于 t 值的单独组,我现在得到的是: 是否有可能将关于 t 值(1、2、4、8、16、24、32)的组对齐,而不会扩展 x 轴?所以我希望 x 值在图形上具有相同的距离,例如 4 组与 2 组的距离与 8 组的距离一样远。

enter image description here

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)