我有一些数据可以捕获多个时间段内两个不同组的百分比。
df< - structure(list(period = structure(c(1L,2L,3L,4L,5L,1L,2L,3L,4L,5L),。标签= c(“…
指定 width 在主要内部 aes (你可以使用传递想要的值 ifelse ):
width
aes
ifelse
library(ggplot2) ggplot(df, aes(period, value, fill = key, width = ifelse(key == "You", 0.7, 0.5))) + geom_bar(stat = "identity") + scale_fill_manual(values = c("darkblue", "gray50"))