Compute the cosine between two vectors.
vcos(x, y)
x
A p x 1 vector.
y
Cosine between x and y
x <- rnorm(5) y <- rnorm(5) vcos(x, y)