R Under development (unstable) (2025-05-18 r88216 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2025 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(testthat)
> test_check("KFAS")
Loading required package: KFAS
Please cite KFAS in publications by using: 

  Jouni Helske (2017). KFAS: Exponential Family State Space Models in R. Journal of Statistical Software, 78(10), 1-39. doi:10.18637/jss.v078.i10.
Call:
SSModel(formula = t12 ~ SSMcycle(period = 10, type = "common", 
    Q = 2) + SSMcycle(period = 10, type = "distinct", P1 = diag(c(1, 
    1, 2, 2)), Q = diag(1:2)) + SSMtrend(2, type = "common", 
    Q = diag(c(1, 0.5))) + SSMtrend(2, type = "distinct", Q = list(diag(0.1, 
    2), diag(0.01, 2)), P1 = diag(c(0.1, 0.01, 0.1, 0.01))) + 
    SSMseasonal(period = 4, type = "common") + SSMseasonal(period = 4, 
    type = "distinct", Q = diag(c(2, 3)), P1 = diag(c(2, 2, 2, 
        3, 3, 3))) + SSMseasonal(period = 5, type = "common", 
    sea.type = "trig") + SSMseasonal(period = 5, type = "distinct", 
    sea.type = "trig", Q = diag(c(0.1, 0.2)), P1 = diag(rep(c(0.1, 
        0.2), each = 4))) + SSMarima(ar = 0.9, ma = 0.2) + SSMregression(~-1 + 
    x, index = 1, Q = 1, data = d))

State space model object of class SSModel

Dimensions:
[1] Number of time points: 100
[1] Number of time series: 2
[1] Number of disturbances: 25
[1] Number of states: 38
Names of the states:
 [1]  x.t1           level          slope          level.t1       slope.t1     
 [6]  level.t2       slope.t2       sea_dummy1     sea_dummy2     sea_dummy3   
[11]  sea_dummy1.t1  sea_dummy2.t1  sea_dummy3.t1  sea_dummy1.t2  sea_dummy2.t2
[16]  sea_dummy3.t2  sea_trig1      sea_trig*1     sea_trig2      sea_trig*2   
[21]  sea_trig1.t1   sea_trig*1.t1  sea_trig2.t1   sea_trig*2.t1  sea_trig1.t2 
[26]  sea_trig*1.t2  sea_trig2.t2   sea_trig*2.t2  cycle          cycle*       
[31]  cycle.t1       cycle*.t1      cycle.t2       cycle*.t2      arima1.t1    
[36]  arima2.t1      arima1.t2      arima2.t2    
Distributions of the time series:
[1]  gaussian

Object is a valid object of class SSModel.[ FAIL 0 | WARN 0 | SKIP 0 | PASS 575 ]
> 
> proc.time()
   user  system elapsed 
  16.40    0.73   17.14