Content - 6066424926612a31c32ee36e6df5a0279f5d6680 - 7f12901/R/TrenchMean.R

visit type:

Tip revision: d4bb25ff74f1d6a70bf1c395dd2775e1304672b0 authored by A.I. McLeod on 30 November 2010, 00:00:00 UTC
version 1.4

Tip revision: d4bb25f

TrenchMean.R

`TrenchMean` <-
function(r,z){
    g1<-colSums(TrenchInverse(toeplitz(r)))
    sum(g1*z)/sum(g1)
}