R/setLastYearSeries.R

Defines functions setLastYearSeries

setLastYearSeries <- function(x, lastYear) {
  x$years <- lastYear - ((length(x$years) - 1):0)
  rownames(x$trw) <- x$years[-1]
  x$span <- range(x$years)
  return(x)
}

Try the xRing package in your browser

Any scripts or data that you put into this service are public.

xRing documentation built on April 22, 2022, 5:05 p.m.