在尝试重现我正在使用question'Thomas的复杂图表时，请跟踪此solution。
所有工作完全符合规定，但我想知道是否有一个选项可以将透明灰色阴影添加到图表的交替“行”，就像在OP提供的原始版本中完成一样。
在我周围找到一个选项来添加覆盖指定区域的透明矩形，例如：
rect(-10, 2.8, 12, 3.3, col="#00000025", border=NA)
然而 - 必须（耐心地）选择上限和下限，主要是通过反复试验。
有没有办法为这个过程添加一些自动化？
答案 0 :(得分：2)
以您的解决方案为基础：
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)