R/AddCosVectors.R

AddCosVectors <- function (vectors) 
{
    cos_sum = 0
    radians = ToRadians(vectors)
    radians_cos = cos(radians)
    cos_sum = sum(radians_cos)
    return(cos_sum)
}

Try the VecStatGraphs2D package in your browser

Any scripts or data that you put into this service are public.

VecStatGraphs2D documentation built on May 2, 2019, 12:36 p.m.