powered by
euclid.inv(U)
euclid, Arotation, lambert
x <- rvmf(10, rnorm(3), 10) euclid.inv(x) euclid(euclid.inv(x)) x
Run the code above in your browser using DataLab