dateutils (version 0.1.5)

try_sa: Seasonally adjust data using seas()

Description

Seasonaly adjust monthly or quarterly data using X-13 SEATS via seas()

Usage

try_sa(x, dates, x11 = FALSE, transfunc = "none", series_name = NULL)

Arguments

x

data

dates

dates corresponding to data 'x'

x11

T/F, use x11 as opposed to X-13 SEATS

transfunc

Data transformation, one of `none` for no transformation, `auto` for automatic detection, or `log` for log transformation

series_name

Include series name to print out if failure (for lapply() applications)

Value

A list with `adj_fact` containing seasonal factors and `sa_final` containing seasonally adjusted data. If seasonal adjsutment failed `adj_fact` will contain zeros and `sa_final` will contain the original data.

Examples

# NOT RUN {
x <- fred[series_name == "gdp constant prices", value]
dates <- fred[series_name == "gdp constant prices", ref_date ]
try_sa(x, dates, transfunc = "log")
# }