R/K0.R

Defines functions KO

KO <- function(xy){
  res <- exp(-0.5*rowSums(xy^2))/(2*pi)
  return((2*res-xy[,1]^2*res-xy[,2]^2*res)^2)
}

Try the sparr package in your browser

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

sparr documentation built on Sept. 11, 2024, 7:17 p.m.