继这个问题之后,我试图重现复杂的图,我正在使用Thomas的解决方案。
所有操作都完全按照规定进行,但我想知道是否有一个选项可以在图形的交替"行"中添加透明的灰色阴影,类似于OP提供的原始版本。
我发现了一个选项,可以添加覆盖指定区域的透明矩形,例如:
rect(-10, 2.8, 12, 3.3, col="#00000025", border=NA)
然而,必须(耐心地)在很大程度上通过试错来选择上限和下限。
有没有办法在这个过程中增加一些自动化?
基于您的解决方案:
shaded_rowseq <- rowseq[rep(c(T,F),length(rowseq)/2)]
rect(-10, shaded_rowseq-0.5, 12, shaded_rowseq+0.5, col="#00000025", border=NA)