R/avespecvar.R

avespecvar <-function (spectrum) {

m <- spectrum$S
m <- matrix(m,nrow=dim(m)[1])

statistic<-mean(rowVars(m))

return(statistic)

}

Try the LS2Wstat package in your browser

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

LS2Wstat documentation built on Sept. 17, 2023, 9:06 a.m.