Defines functions bpk

Documented in bpk

bpk <- function(X, bandwidths, a = 1.0, kernel = dnorm, ...)
  apply(X, 1, function(u, v, b) mean(kernel((u%*%v)/b) / b),
        v = bandwidths$alphas, b = a*bandwidths$lambdas)

Try the bpkde package in your browser

Any scripts or data that you put into this service are public.

bpkde documentation built on May 30, 2017, 1:52 a.m.