R/moments.R

moments <-
function (y, order = 8) 
{
  val <- 1
  if (order > 0) for (k in 1:order)
    val <- c(val, mean(y^k))
  return(val)
}

Try the MaskJointDensity package in your browser

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

MaskJointDensity documentation built on May 2, 2019, 8:28 a.m.