Combine result objects

Share:

Description

Combine result objects into a single result object

Usage

1

Arguments

...

Result objects, SimResult

Value

A combined result object

Author(s)

Terry Jorgensen (University of Kansas; TJorgensen314@gmail.com), Sunthud Pornprasertmanit (psunthud@gmail.com)

See Also

Result object (SimResult)

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
loading <- matrix(0, 6, 2)
loading[1:3, 1] <- NA
loading[4:6, 2] <- NA
LY <- bind(loading, 0.7)

latent.cor <- matrix(NA, 2, 2)
diag(latent.cor) <- 1
RPS <- binds(latent.cor, 0.5)

RTE <- binds(diag(6))

VY <- bind(rep(NA,6),2)

CFA.Model <- model(LY = LY, RPS = RPS, RTE = RTE, modelType = "CFA")
Output1 <- sim(5, CFA.Model, n=200, seed=123321)
Output2 <- sim(4, CFA.Model, n=200, seed=324567)
Output3 <- sim(3, CFA.Model, n=200, seed=789987)
Output <- combineSim(Output1, Output2, Output3)
summary(Output)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.