norm3d(0.3, 0.3, 0.2) # peak value at the mean (with default parameters)
norm3d(c(0.2, 0.3), 0.3, 0.2)
x <- y <- seq(0, 1, length.out = 100)
z <- outer(x, y, function(x, y) norm3d(x, y, t = 0.2))
image(x, y, z, col = heat.colors(50), main = "Spatial slice of norm3d at t = 0.2")
Run the code above in your browser using DataLab