Sample finite-dimensional vectors to use as latent position vectors in random dot product graphs
sample_sphere_volume(dim, n = 1, radius = 1, positive = TRUE)
Integer scalar, the dimension of the random vectors.
Integer scalar, the sample size.
Numeric scalar, the radius of the sphere to sample.
Logical scalar, whether to sample from the positive orthant of the sphere.
A dim
(length of the alpha
vector for
sample_dirichlet
) times n
matrix, whose columns are the sample
vectors.
sample_sphere_volume
generates uniform samples from (dim-1)
-sphere) i.e. the Euclidean norm of the samples is
smaller or equal to radius
.
Other latent position vector samplers: sample_dirichlet
,
sample_sphere_surface
# NOT RUN {
lpvs.sph.vol <- sample_sphere_volume(dim=10, n=20, radius=1)
RDP.graph.4 <- sample_dot_product(lpvs.sph.vol)
vec.norm <- apply(lpvs.sph.vol, 2, function(x) { sum(x^2) })
vec.norm
# }
Run the code above in your browser using DataLab