powered by
Mean Cosine and Sine
mean_SC(x, w = NULL, na.rm = TRUE)
named two element vector
angles in degrees
weightings
logical
if (FALSE) { set.seed(1) x <- rvm(100, 0, 5) mean_SC(x) }
Run the code above in your browser using DataLab