R/Gaussbound.R

In regspec: Non-Parametric Bayesian Spectrum Estimation for Multirate Data

Defines functions Gaussbound

Documented in Gaussbound

Gaussbound<-function(mode,tau,prob){
q<-1-prob
if(q<1/3){k<-tau*2/3/q^0.5}
if(q>1/3){k<-tau*3^0.5*(1-q)}
mode+c(-1,1)*k
}

Try the regspec package in your browser