log_cv_kde_polysph: Cross-validation for the polyspherical kernel density...

In polykde: Polyspherical Kernel Density Estimation

Cross-validation for the polyspherical kernel density estimator

Description

Computes the logarithm of the cross-validated kernel density estimator: \log \hat{f}_{-i}(\boldsymbol{X}_i;\boldsymbol{h}), i = 1, \ldots, n.

Usage

log_cv_kde_polysph(X, d, h, weights = as.numeric(c()), wrt_unif = FALSE,
  normalized = TRUE, intrinsic = FALSE, norm_X = FALSE, kernel = 1L,
  kernel_type = 1L, k = 10)

Arguments

X	a matrix of size c(n, sum(d) + r) with the sample.
d	vector of size r with dimensions.
h	vector of size r with bandwidths.
weights	weights for each observation. If provided, a vector of size n with the weights for multiplying each kernel. If not provided, set internally to rep(1 / n, n), which gives the standard estimator.
wrt_unif	flag to return a density with respect to the uniform measure. If FALSE (default), the density is with respect to the Lebesgue measure.
normalized	flag to compute the normalizing constant of the kernel and include it in the kernel density estimator. Defaults to TRUE.
intrinsic	use the intrinsic distance, instead of the extrinsic-chordal distance, in the kernel? Defaults to FALSE.
norm_X	ensure a normalization of the data? Defaults to FALSE.
kernel	kernel employed: 1 for von Mises–Fisher (default); 2 for Epanechnikov; 3 for softplus.
kernel_type	type of kernel employed: 1 for product kernel (default); 2 for spherically symmetric kernel.
k	softplus kernel parameter. Defaults to 10.0.

Value

A column vector of size c(n, 1) with the evaluation of the logarithm of the cross-validated kernel density estimator.

Examples

# Simple check on S^1 x S^2
n <- 5
d <- c(1, 2)
h <- c(0.2, 0.2)
X <- r_unif_polysph(n = n, d = d)
log_cv_kde_polysph(X = X, d = d, h = h)
kde_polysph(x = X[1, , drop = FALSE], X = X[-1, ], d = d, h = h, log = TRUE)

polykde documentation built on April 16, 2025, 1:11 a.m.