R/seas.R

In modTempEff: Modelling temperature effects using time series data

Defines functions seas

Documented in seas

seas<-function(x,ndx=stop("please, provide `ndx' in seas()")){
        r<-x
        #if(is.null(ndx)) ndx<-min(40,length(x)/4)
        attr(r,"ndx")<-ndx
        return(r)
        }

Try the modTempEff package in your browser