Extract Component from 'RJDemetra' model
seasonal(x, forecast = FALSE, calendar = FALSE, ...)
trendcycle(x, forecast = FALSE, ...)
irregular(x, forecast = FALSE, corrected = FALSE, ...)
seasonaladj(x, forecast = FALSE, corrected = FALSE, ...)
calendaradj(x, forecast = FALSE, ...)
calendar(x, forecast = FALSE, ...)
raw(x, forecast = FALSE, backcast = FALSE, ...)