使用ggplot2绘制两条带状线

ADJ

我有一个带有度量v和分类变量t的数据框。我可以像这样画线

set.seed(42)
v <- runif(20, min=0, max=100)
t <- sample( LETTERS[1:2], 20, replace=TRUE )

df <- data.frame(v,t)

qplot(1:length(v),v,data=df,geom="line",group=t,color=t)

我想在每行周围添加丝带。可能具有不同的宽度(我将使用公式设置)和透明度。我尝试用“功能区”替换geom,但出现以下错误:

qplot(1:length(v),v,data=df,geom="ribbon",group=t,color=t)
Error: geom_ribbon requires the following missing aesthetics: ymin, ymax

如何在一张图表中同时绘制线条和功能区?

eipi10

这是添加功能区的方法。当然,您可以更改公式yminymax满足您的需求:

ggplot(df, aes(x=1:length(v), y=v, group=t, colour=t)) + 
  geom_ribbon(aes(ymin=v-0.1*v, ymax=v+0.1*v, fill=t), alpha=0.2) +
  geom_line()

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章