Null hypothesis: data follows a time series model using auto.arima from the forecast package

null_ts(var, modelfn)

Arguments

var

variable to model as a time series

modelfn

method for simulating from ts model.

Value

a function that given data generates a null data set. For use with lineup or rorschach

See also

null_model

Examples

require(forecast)
#> Loading required package: forecast
#> Registered S3 method overwritten by 'quantmod':
#>   method            from
#>   as.zoo.data.frame zoo 
require(ggplot2)
require(dplyr)
data(aud)
l <- lineup(null_ts("rate", auto.arima), aud)
#> decrypt("k4ZV xo3o Nm QPuN3NPm CA")
ggplot(l, aes(x=date, y=rate)) + geom_line() +
  facet_wrap(~.sample, scales="free_y") +
  theme(axis.text = element_blank()) +
  xlab("") + ylab("")

l_dif <- l %>%
  group_by(.sample) %>%
  mutate(d=c(NA,diff(rate))) %>%
  ggplot(aes(x=d)) + geom_density() +
  facet_wrap(~.sample)