Loads the file inst/extdata/toy.rds.
Examples
toy <- load_toy()
str(toy)
#> List of 11
#> $ Y_mat : num [1:150, 1:20] -0.0519 2.1092 1.4448 -0.4867 -1.6286 ...
#> $ Y_list :List of 3
#> ..$ : num [1:52, 1:20] -0.0519 2.1092 1.4448 -0.4867 -1.6286 ...
#> .. ..- attr(*, "dimnames")=List of 2
#> .. .. ..$ : NULL
#> .. .. ..$ : NULL
#> ..$ : num [1:58, 1:20] 3.15 -1.33 3.33 0.73 -1.09 ...
#> .. ..- attr(*, "dimnames")=List of 2
#> .. .. ..$ : NULL
#> .. .. ..$ : NULL
#> ..$ : num [1:40, 1:20] 0.323 0.451 -2.435 -1.283 2.428 ...
#> .. ..- attr(*, "dimnames")=List of 2
#> .. .. ..$ : NULL
#> .. .. ..$ : NULL
#> $ n_s : int [1:3, 1] 52 58 40
#> $ A : num [1:150, 1:3] 1 1 1 1 1 1 1 1 1 1 ...
#> $ Phi : num [1:20, 1:4] -1 -0.895 -0.789 -0.684 -0.579 ...
#> $ SigmaPhi : num [1:20, 1:20] 1.762 1.507 1.252 0.997 0.742 ...
#> $ LambdaList :List of 3
#> ..$ : num [1:20, 1] -0.857 -0.718 0 0 0 ...
#> ..$ : num [1:20, 1] 0 0 0 0.866 0 ...
#> ..$ : num [1:20, 1] 0.73 0 0 0 0 ...
#> $ SigmaLambdaList:List of 3
#> ..$ : num [1:20, 1:20] 0.735 0.616 0 0 0 ...
#> ..$ : num [1:20, 1:20] 0 0 0 0 0 0 0 0 0 0 ...
#> ..$ : num [1:20, 1:20] 0.532 0 0 0 0 ...
#> $ SigmaMarginal :List of 3
#> ..$ : num [1:20, 1:20] 2.813 2.123 1.252 0.997 0.742 ...
#> ..$ : num [1:20, 1:20] 2.118 1.507 1.252 0.997 0.742 ...
#> ..$ : num [1:20, 1:20] 2.59 1.507 1.252 0.997 0.742 ...
#> $ Psi_list :List of 3
#> ..$ : num [1:20, 1:20] 0.316 0 0 0 0 ...
#> ..$ : num [1:20, 1:20] 0.356 0 0 0 0 ...
#> ..$ : num [1:20, 1:20] 0.296 0 0 0 0 ...
#> $ Psi_mat : num [1:20, 1:3] 0.316 0.356 0.914 0.274 0.433 ...