Skip to main content

Browse the archive

https://github.com/cran/ltsa
21 January 2021, 21:54:35 UTC
Revision 83deceb1d65445b7dcad78a48eaab0b732534fc5 authored by A.I. McLeod on 22 August 2015, 23:49:55 UTC, committed by cran-robot on 22 August 2015, 23:49:55 UTC 
version 1.4.5
1 parent dd8ed05
Raw File
Tip revision: 83deceb1d65445b7dcad78a48eaab0b732534fc5 authored by A.I. McLeod on 22 August 2015, 23:49:55 UTC
version 1.4.5
Tip revision: 83deceb
TrenchMean.R 
`TrenchMean` <-
function(r,z){
    g1<-colSums(TrenchInverse(toeplitz(r)))
    sum(g1*z)/sum(g1)
}
back to top