R/getRefPeriod.R

In xprimexinverse/pxRmisc: Miscellaneous helper functions for pxR package

Defines functions getRefPeriod

Documented in getRefPeriod

getRefPeriod <- function(px){
  if ("px" %in% class(px)){
    px$REFPERIOD
  }
}