powered by
Computes the density of the uniform distribution on the polysphere.
d_unif_polysph(x, d, log = FALSE)
A vector of size nx with the evaluated density.
nx
a matrix of size c(nx, sum(d) + r) with the evaluation points.
c(nx, sum(d) + r)
vector of size r with dimensions.
r
compute the logarithm of the density? Defaults to FALSE.
FALSE
# Simple check of integration on S^1 x S^2 d <- c(1, 2) x <- r_unif_polysph(n = 1e4, d = d) mean(1 / d_unif_polysph(x = x, d = d)) / prod(rotasym::w_p(p = d + 1))
Run the code above in your browser using DataLab