我需要制作一些稀疏曲线,并希望它们在置信区间条的边缘显示晶须,而默认情况下仅显示没有晶须的条纹:如何将CI晶须添加到稀疏曲线
library(vegan)
data("dune")
result <- specaccum(dune)
plot(result, lwd=2)
我试着使用arrows
FUNC添加一些晶须但specaccum
函数的结果只包含标准偏差。所以我结束了一半的工作:
samples <- result$sites
error <- result$sd
richness <- result$richness
arrows(samples, richness-error, samples, richness+error, angle=90, code=3, length=0.05)
从我所搜索的内容,负压曲线,最常见的方法是转换将置信区间放入阴影区域(使用参数),然后将boxplot
添加到绘制曲线。但是,这导致了我宁愿避免的非常繁忙的图像。
有没有人有更优雅的解决方案?
很高兴看到我接近达成解决方案。 干杯! –
目前我们使用'segments'来绘制误差线。我们可以切换到箭头(...,code = 3,angle = 90)',但这需要添加参数'ci.len'来设置垂直结束条的长度(默认'ci.len = 0')。这会是可取的吗? –