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