Uses C++ code for efficiency.
sliding_cov(short, long)
short
Numeric vector.
long
short <- rnorm(4) long <- rnorm(10) sliding_cov(short, long)