powered by
movAvLines(y, x=1:length(y), widths=2:7*2-1, weights, col="blue", alpha=0.3, plot=FALSE, las=1, ... )
movAv
addAlpha
lines
set.seed(42) movAvLines(cumsum(rnorm(50)), plot=TRUE, lwd=3)
Run the code above in your browser using DataLab