R/multi.dnorm.3d.spin.R

Defines functions multi.dnorm.3d.spin

multi.dnorm.3d.spin <- function(len=40) { 

  require(aplpack)

  tmp <- seq(-4, 4, len=len)
  tmp2 <- expand.grid(tmp, tmp)
  spin3R(as.matrix(cbind(tmp2, apply(tmp2, 1, dmulti.norm))))

}
John-R-Wallace/R-ToolBox documentation built on June 9, 2025, 4:57 a.m.