R/AddSinVectors3D.R

AddSinVectors3D <- function (vectors) 
{
    sin_sum = 0
    h = 1
    radians = ToRadians3D(vectors)
    radians_sin = sin(radians)
    sin_sum = sum(radians_sin)
    return(sin_sum)
}

Try the VecStatGraphs3D package in your browser

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

VecStatGraphs3D documentation built on May 1, 2019, 8:03 p.m.