The hardware and bandwidth for this mirror is donated by dogado GmbH, the Webhosting and Full Service-Cloud Provider. Check out our Wordpress Tutorial.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]dogado.de.

CRAN Package Check Results for Package ackwards

Last updated on 2026-07-24 17:50:58 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-fedora-clang 0.1.1 12.00 970.12 982.12 OK
r-devel-linux-x86_64-fedora-gcc 0.1.1 371.97 OK
r-release-macos-arm64 0.1.1 2.00 75.00 77.00 OK
r-release-macos-x86_64 0.1.1 5.00 571.00 576.00 OK
r-oldrel-macos-arm64 0.1.1 2.00 78.00 80.00 ERROR
r-oldrel-macos-x86_64 0.1.1 6.00 815.00 821.00 OK

Check Details

Version: 0.1.1
Check: tests
Result: ERROR Running ‘testthat.R’ [109s/46s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(ackwards) > > test_check("ackwards") Starting 2 test processes. > test-suggest_k.R: i Running parallel analysis (5 iterations, PC + FA)... > test-suggest_k.R: i PA-PC suggested 6 components -- above the evaluated ceiling (`k_max` = 3); reporting k <= 3. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: i PA-FA suggested 6 factors -- above the evaluated ceiling (`k_max` = 3); reporting k <= 3. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: v Running parallel analysis (5 iterations, PC + FA)... [96ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 364 rows with missing values removed (2436 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [55ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [3s] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (5 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (5 iterations, PC + FA)... [40ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 54 rows with missing values removed (946 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [22ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [645ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (5 iterations, PC + FA)... > test-suggest_k.R: i PA-PC suggested 3 components -- above the evaluated ceiling (`k_max` = 2); reporting k <= 2. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: i PA-FA suggested 5 factors -- above the evaluated ceiling (`k_max` = 2); reporting k <= 2. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: v Running parallel analysis (5 iterations, PC + FA)... [51ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 86 rows with missing values removed (914 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [18ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [731ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [45ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 54 rows with missing values removed (946 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [32ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [416ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [29ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 54 rows with missing values removed (946 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [26ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [408ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [16ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [24ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [24ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (5 iterations, PC + FA)... > test-suggest_k.R: i PA-FA suggested 4 factors -- above the evaluated ceiling (`k_max` = 2); reporting k <= 2. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: v Running parallel analysis (5 iterations, PC + FA)... [60ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [28ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 41 rows with missing values removed (959 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [26ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [194ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [33ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: i CD requires EFAtools (install to enable). > test-suggest_k.R: v Running MAP and VSS... [27ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In factor.scores, the correlation matrix is singular, the pseudo inverse is used > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In factor.scores, the correlation matrix is singular, the pseudo inverse is used > test-suggest_k.R: In factor.scores, the correlation matrix is singular, the pseudo inverse is used > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In smc, smcs < 0 were set to .0 > test-suggest_k.R: In factor.scores, the correlation matrix is singular, the pseudo inverse is used > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [19ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: x Running MAP and VSS... [11ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [29ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 64 rows with missing values removed (936 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [28ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [607ms] > test-suggest_k.R: > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD v > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD v* > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 3 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD v > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD v* > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 3 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA - MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v > test-suggest_k.R: k = 2: PA-PC v PA-FA - MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD v > test-suggest_k.R: k = 3: PA-PC - PA-FA - MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD v* > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: undetermined (no FA factor exceeded random threshold) > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 3 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA - MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v > test-suggest_k.R: k = 2: PA-PC v PA-FA - MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD v > test-suggest_k.R: k = 3: PA-PC - PA-FA - MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD v* > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: undetermined (no FA factor exceeded random threshold) > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 3 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: i Running parallel analysis (20 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (20 iterations, PC + FA)... [110ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 125 rows with missing values removed (875 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [46ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-esem.R: > test-esem.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-esem.R: Engine: esem > test-esem.R: Rotation: varimax > test-esem.R: Basis: pearson > test-esem.R: n: 200 > test-esem.R: k (max): 3 > test-esem.R: > test-esem.R: -- Levels -- > test-esem.R: > test-esem.R: v k = 1: 1 factor, 43.0% variance > test-esem.R: v k = 2: 2 factors, 85.2% variance > test-esem.R: v k = 3: 3 factors, 87.8% variance > test-esem.R: > test-esem.R: -- Edges -- > test-esem.R: > test-esem.R: 3 of 8 edges have |r| >= 0.3 > test-esem.R: -------------------------------------------------------------------------------- > test-esem.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-esem.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-esem.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-esem.R: they do not validate the edges or the hierarchy itself. > test-suggest_k.R: v Running Comparison Data (CD)... [5.7s] > test-suggest_k.R: > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* > test-suggest_k.R: + CD requires EFAtools (install to enable). > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* > test-suggest_k.R: + CD requires EFAtools (install to enable). > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: i PA-FA suggested 3 factors -- above the evaluated ceiling (`k_max` = 2); reporting k <= 2. > test-suggest_k.R: i Increase `k_max` to evaluate the full suggestion. > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [67ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: CD: 41 rows with missing values removed (959 complete cases used). > test-suggest_k.R: v Running MAP and VSS... [29ms] > test-suggest_k.R: > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [212ms] > test-suggest_k.R: > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v* > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD - > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD - > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 1 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427* VSS-1 0.6224 VSS-2 0.0000 CD v* > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522 VSS-1 0.7305* VSS-2 0.7981 CD - > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 CD - > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510* CD - > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 3 > test-suggest_k.R: * MAP: k = 1 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: * CD: k = 1 > test-suggest_k.R: Consensus range: k = 1-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427 VSS-1 0.6224 VSS-2 0.0000 > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522* VSS-1 0.7305* VSS-2 0.7981* > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510 > test-suggest_k.R: + CD requires EFAtools (install to enable). > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 2 > test-suggest_k.R: * MAP: k = 2 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 2 > test-suggest_k.R: Consensus: k = 2 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: PA-PC v PA-FA v MAP 0.0427 VSS-1 0.6224 VSS-2 0.0000 > test-suggest_k.R: k = 2: PA-PC v PA-FA v MAP 0.0522* VSS-1 0.7305* VSS-2 0.7981* > test-suggest_k.R: k = 3: PA-PC - PA-FA v MAP 0.0971 VSS-1 0.6415 VSS-2 0.8407 > test-suggest_k.R: k = 4: PA-PC - PA-FA - MAP 0.1577 VSS-1 0.6451 VSS-2 0.8510 > test-suggest_k.R: + CD requires EFAtools (install to enable). > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * PA-PC: k <= 2 > test-suggest_k.R: * PA-FA: k <= 2 > test-suggest_k.R: * MAP: k = 2 > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 2 > test-suggest_k.R: Consensus: k = 2 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [12ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (5 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (5 iterations, PC + FA)... [39ms] > test-suggest_k.R: > test-suggest_k.R: CD: 54 rows with missing values removed (946 complete cases used). > test-suggest_k.R: i Running Comparison Data (CD)... > test-suggest_k.R: v Running Comparison Data (CD)... [698ms] > test-suggest_k.R: > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [12ms] > test-suggest_k.R: > test-suggest_k.R: > test-suggest_k.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-suggest_k.R: Variables: 8 > test-suggest_k.R: n: 1,000 > test-suggest_k.R: Basis: pearson > test-suggest_k.R: Tested k: 1-4 > test-suggest_k.R: > test-suggest_k.R: -- Criteria (k = 1-4) -- > test-suggest_k.R: > test-suggest_k.R: k = 1: VSS-1 0.6224 VSS-2 0.0000 > test-suggest_k.R: k = 2: VSS-1 0.7305* VSS-2 0.7981 > test-suggest_k.R: k = 3: VSS-1 0.6415 VSS-2 0.8407 > test-suggest_k.R: k = 4: VSS-1 0.6451 VSS-2 0.8510* > test-suggest_k.R: > test-suggest_k.R: -- Recommendations -- > test-suggest_k.R: > test-suggest_k.R: * VSS-1: k = 2 > test-suggest_k.R: * VSS-2: k = 4 > test-suggest_k.R: Consensus range: k = 2-4 > test-suggest_k.R: -------------------------------------------------------------------------------- > test-suggest_k.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-suggest_k.R: above the consensus to observe factor fragmentation is intentional. > test-suggest_k.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-suggest_k.R: 2023). PA-FA and CD are more conservative. Use the range. > test-suggest_k.R: i Running MAP and VSS... > test-suggest_k.R: v Running MAP and VSS... [85ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [33ms] > test-suggest_k.R: > test-suggest_k.R: i Running parallel analysis (3 iterations, PC + FA)... > test-suggest_k.R: v Running parallel analysis (3 iterations, PC + FA)... [33ms] > test-suggest_k.R: > test-layout.R: i Redundancy pruning (direct criterion, |r| >= 0.9) flagged 3 nodes. > test-layout.R: i Nodes are retained in the object; inspect with `x$prune$nodes` and `x$prune$chains`. > test-esem.R: > test-esem.R: *** caught segfault *** > test-esem.R: address 0x110, cause 'invalid permissions' > test-esem.R: > test-esem.R: Traceback: > test-esem.R: 1: lav_inspect_vcov(object, standardized = TRUE, type = type, ov_std = ov_std_user, free_only = FALSE, add_labels = FALSE, add_class = FALSE) > test-esem.R: 2: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 3: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 4: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 5: tryCatch(expr, error = function(e) { call <- conditionCall(e) if (!is.null(call)) { if (identical(call[[1L]], quote(doTryCatch))) call <- sys.call(-4L) dcall <- deparse(call, nlines = 1L) prefix <- paste("Error in", dcall, ": ") LONG <- 75L sm <- strsplit(conditionMessage(e), "\n")[[1L]] w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w") if (is.na(w)) w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L], type = "b") if (w > LONG) prefix <- paste0(prefix, "\n ") } else prefix <- "Error : " msg <- paste0(prefix, conditionMessage(e), "\n") .Internal(seterrmessage(msg[1L])) if (!silent && isTRUE(getOption("show.error.messages"))) { cat(msg, file = outFile) .Internal(printDeferredWarnings()) } invisible(structure(msg, class = "try-error", condition = e))}) > test-esem.R: 6: try(lav_inspect_vcov(object, standardized = TRUE, type = type, ov_std = ov_std_user, free_only = FALSE, add_labels = FALSE, add_class = FALSE)) > test-esem.R: 7: standardizedSolution(lavaan, remove_eq = FALSE, remove_ineq = FALSE, remove_def = FALSE) > test-esem.R: 8: lav_step17_lavaan(lavmc = lavmc, timing = timing, lavoptions = lavoptions, lavpartable = lavpartable, lavdata = lavdata, lavsamplestats = lavsamplestats, lavmodel = lavmodel, lavcache = lavcache, lavfit = lavfit, lavboot = lavboot, lavoptim = lavoptim, lavimplied = lavimplied, lavloglik = lavloglik, lavvcov = lavvcov, lavtest = lavtest, lavh1 = lavh1, lavbaseline = lavbaseline, laveqs = laveqs, start_time0 = start_time0, lav_monte_carlo = lav_monte_carlo) > test-esem.R: 9: lavaan::lavaan(model = c("efa(\"efa\")*f1 =~ x1 + x2 + x3 + x4 + x5 + x6", "efa(\"efa\")*f2 =~ x1 + x2 + x3 + x4 + x5 + x6", "efa(\"efa\")*f3 =~ x1 + x2 + x3 + x4 + x5 + x6"), data = list(x1 = c(5L, 3L, 4L, 4L, 3L, 4L, 4L, 3L, 5L, 2L, 4L, 5L, 3L, 3L, 3L, 4L, 2L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 4L, 3L, 5L, 1L, 1L, 2L, 1L, 3L, 4L, 2L, 3L, 3L, 1L, 3L, 1L, 5L, 3L, 4L, 4L, 2L, 5L, 4L, 4L, 3L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 5L, 3L, 5L, 4L, 5L, 3L, 4L, 2L, 3L, 4L, 1L, 3L, 3L, 3L, 4L, 1L, 1L, 5L, 3L, 4L, 3L, 2L, 3L, 3L, 3L, 4L, 4L, 5L, 2L, 4L, 5L, 1L, 1L, 1L, 1L, 3L, 4L, 5L, 5L, 1L, 5L, 1L, 3L, 2L, 2L, 3L, 3L, 3L, 4L, 2L, 2L, 1L, 2L, 3L, 5L, 1L, 3L, 1L, 2L, 3L, 2L, 3L, 3L, 3L, 1L, 1L, 3L, 4L, 3L, 3L, 4L, 5L, 2L, 3L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 1L, 5L, 2L, 2L, 4L, 1L, 2L, 1L, 5L, 3L, 1L, 1L, 3L, 3L, 3L, 5L, 3L, 1L, 3L, 3L, 4L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 1L, 5L, 5L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 1L, 3L, 4L, 2L, 2L, 3L, 3L, 4L, 1L, 2L, 4L, 2L, 3L, 5L, 3L, 1L, 4L, 5L, 5L, 1L, 1L, 2L, 2L, 3L, 3L, 1L, 5L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 2L, 3L, 2L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 3L, 5L, 1L, 3L, 1L, 2L, 5L, 3L, 4L, 1L, 3L, 4L, 4L, 5L, 1L, 5L, 4L, 2L, 5L, 2L, 1L, 3L, 1L, 3L, 5L, 1L, 3L, 3L, 2L, 2L, 4L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 1L, 4L, 4L, 3L, 3L, 3L, 3L, 4L, 3L, 2L, 5L, 4L, 3L, 2L, 3L, 3L, 3L, 5L, 5L, 2L, 1L, 4L, 2L, 5L, 2L, 5L, 2L, 3L, 3L, 4L, 4L, 2L), x2 = c(5L, 2L, 3L, 3L, 5L, 1L, 5L, 3L, 5L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 3L, 1L, 1L, 5L, 3L, 1L, 2L, 5L, 5L, 3L, 2L, 1L, 3L, 3L, 4L, 5L, 5L, 2L, 4L, 1L, 2L, 3L, 1L, 2L, 3L, 2L, 5L, 2L, 1L, 4L, 1L, 5L, 3L, 4L, 4L, 3L, 5L, 3L, 3L, 3L, 5L, 4L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 5L, 3L, 4L, 5L, 1L, 2L, 4L, 3L, 3L, 4L, 5L, 4L, 2L, 1L, 5L, 3L, 3L, 3L, 1L, 5L, 3L, 5L, 5L, 5L, 5L, 2L, 4L, 5L, 2L, 2L, 1L, 2L, 3L, 3L, 5L, 5L, 2L, 5L, 1L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 2L, 1L, 2L, 1L, 5L, 1L, 3L, 2L, 1L, 4L, 3L, 3L, 3L, 2L, 1L, 1L, 3L, 4L, 3L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 3L, 2L, 1L, 2L, 1L, 3L, 5L, 2L, 2L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 3L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 4L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 3L, 3L, 3L, 3L, 2L, 3L, 3L, 3L, 1L, 4L, 3L, 1L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 4L, 4L, 5L, 5L, 1L, 3L, 4L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 1L, 5L, 3L, 3L, 4L, 3L, 3L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 3L, 4L, 1L, 3L, 3L, 2L, 5L, 3L, 3L, 2L, 1L, 5L, 5L, 5L, 1L, 5L, 4L, 3L, 5L, 1L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 1L, 1L, 5L, 4L, 3L, 1L, 3L, 4L, 3L, 2L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 4L, 2L, 4L, 5L, 5L, 1L, 2L, 3L, 3L, 3L, 5L, 2L, 1L, 2L, 2L, 4L, 3L, 5L, 3L, 3L, 2L, 3L, 3L, 1L), x3 = c(5L, 2L, 3L, 4L, 4L, 3L, 4L, 4L, 5L, 3L, 4L, 5L, 1L, 3L, 3L, 4L, 4L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 4L, 2L, 3L, 1L, 4L, 3L, 3L, 4L, 5L, 3L, 3L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 4L, 2L, 1L, 4L, 3L, 5L, 2L, 4L, 3L, 2L, 5L, 3L, 3L, 3L, 5L, 2L, 1L, 3L, 3L, 3L, 5L, 5L, 1L, 4L, 3L, 5L, 4L, 5L, 2L, 3L, 3L, 1L, 1L, 4L, 4L, 5L, 2L, 2L, 5L, 3L, 3L, 3L, 1L, 4L, 4L, 2L, 5L, 4L, 5L, 2L, 4L, 5L, 1L, 2L, 1L, 2L, 3L, 4L, 4L, 4L, 2L, 5L, 2L, 3L, 3L, 3L, 3L, 2L, 4L, 3L, 3L, 1L, 1L, 2L, 1L, 5L, 2L, 3L, 1L, 2L, 2L, 2L, 3L, 3L, 2L, 1L, 1L, 4L, 5L, 1L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 3L, 3L, 2L, 1L, 3L, 3L, 4L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 2L, 2L, 5L, 2L, 3L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 3L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 4L, 4L, 3L, 4L, 2L, 3L, 4L, 3L, 1L, 3L, 3L, 1L, 1L, 3L, 3L, 4L, 1L, 2L, 4L, 3L, 4L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 1L, 1L, 3L, 2L, 1L, 5L, 3L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 4L, 3L, 2L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 2L, 4L, 2L, 3L, 3L, 3L, 5L, 3L, 4L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 5L, 3L, 4L, 2L, 1L, 3L, 2L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 3L, 4L, 3L, 1L, 3L, 4L, 5L, 3L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 5L, 5L, 5L, 1L, 2L, 3L, 3L, 4L, 5L, 1L, 1L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 4L, 3L, 1L), x4 = c(3L, 4L, 3L, 5L, 3L, 3L, 4L, 4L, 2L, 2L, 3L, 3L, 2L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 2L, 5L, 3L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 4L, 2L, 2L, 4L, 5L, 3L, 1L, 1L, 3L, 2L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 1L, 3L, 3L, 5L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 2L, 1L, 2L, 1L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 4L, 5L, 3L, 5L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 2L, 2L, 3L, 5L, 4L, 3L, 3L, 3L, 2L, 3L, 4L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 2L, 2L, 1L, 3L, 1L, 5L, 4L, 1L, 2L, 2L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 3L, 5L, 1L, 2L, 2L, 5L, 5L, 3L, 5L, 3L, 5L, 3L, 5L, 3L, 2L, 4L, 1L, 2L, 3L, 2L, 3L, 2L, 5L, 4L, 5L, 2L, 5L, 5L, 4L, 1L, 1L, 3L, 5L, 5L, 1L, 2L, 4L, 1L, 4L, 1L, 3L, 2L, 2L, 3L, 3L, 4L, 3L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 3L, 5L, 3L, 3L, 3L, 5L, 3L, 4L, 5L, 2L, 4L, 3L, 5L, 4L, 2L, 4L, 2L, 3L, 3L, 2L, 1L, 4L, 4L, 2L, 2L, 3L, 5L, 5L, 1L, 2L, 4L, 3L, 5L, 3L, 4L, 3L, 5L, 4L, 1L, 2L, 5L, 1L, 1L, 1L, 2L, 3L, 2L, 3L, 2L, 3L, 5L, 1L, 2L, 3L, 3L, 5L, 4L, 4L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 5L, 1L, 5L, 1L, 5L, 3L, 5L, 4L, 2L, 1L, 4L, 3L, 2L, 3L, 2L, 2L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 2L, 1L, 3L, 1L, 4L, 1L, 2L, 3L, 4L, 3L, 3L, 2L, 3L, 3L, 1L, 5L, 1L, 4L), x5 = c(3L, 4L, 3L, 3L, 1L, 3L, 4L, 5L, 3L, 3L, 3L, 2L, 2L, 3L, 4L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 3L, 3L, 5L, 2L, 4L, 4L, 2L, 3L, 4L, 3L, 3L, 3L, 5L, 2L, 1L, 1L, 1L, 2L, 4L, 4L, 3L, 2L, 3L, 3L, 5L, 1L, 3L, 5L, 3L, 2L, 4L, 2L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 3L, 3L, 1L, 5L, 1L, 3L, 3L, 5L, 4L, 5L, 1L, 5L, 3L, 3L, 1L, 3L, 5L, 5L, 1L, 4L, 5L, 3L, 4L, 1L, 4L, 5L, 4L, 3L, 3L, 5L, 2L, 3L, 4L, 3L, 3L, 2L, 5L, 5L, 3L, 3L, 4L, 1L, 2L, 3L, 4L, 5L, 1L, 2L, 1L, 1L, 2L, 1L, 1L, 1L, 3L, 2L, 5L, 4L, 1L, 3L, 1L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 4L, 3L, 5L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 3L, 3L, 2L, 3L, 1L, 5L, 4L, 5L, 2L, 5L, 5L, 3L, 1L, 1L, 3L, 5L, 4L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 2L, 3L, 3L, 3L, 3L, 2L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 4L, 2L, 2L, 1L, 3L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 5L, 3L, 3L, 4L, 5L, 5L, 2L, 3L, 4L, 1L, 1L, 1L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 2L, 2L, 2L, 3L, 5L, 3L, 5L, 3L, 2L, 3L, 5L, 1L, > test-esem.R: 4L, 3L, 4L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 2L, 3L, 1L, 2L, 2L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 3L, 3L, 1L, 1L, 3L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 4L, 1L, 4L), x6 = c(3L, 5L, 3L, 3L, 3L, 3L, 4L, 5L, 1L, 3L, 3L, 1L, 1L, 2L, 3L, 2L, 2L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 4L, 3L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 1L, 5L, 4L, 5L, 1L, 4L, 5L, 5L, 1L, 3L, 3L, 3L, 5L, 3L, 4L, 3L, 2L, 3L, 1L, 3L, 3L, 3L, 3L, 5L, 1L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 2L, 4L, 1L, 3L, 5L, 5L, 2L, 3L, 5L, 3L, 1L, 3L, 4L, 5L, 5L, 3L, 1L, 3L, 1L, 3L, 5L, 3L, 3L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 1L, 4L, 5L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 1L, 3L, 1L, 5L, 5L, 1L, 4L, 3L, 4L, 4L, 2L, 5L, 3L, 3L, 5L, 2L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 5L, 5L, 3L, 5L, 1L, 4L, 3L, 3L, 3L, 2L, 4L, 1L, 3L, 3L, 2L, 3L, 3L, 5L, 4L, 5L, 2L, 3L, 5L, 3L, 1L, 1L, 3L, 5L, 3L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 3L, 2L, 2L, 3L, 3L, 1L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 2L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 4L, 1L, 3L, 4L, 5L, 5L, 3L, 3L, 1L, 3L, 1L, 2L, 1L, 5L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 5L, 3L, 5L, 3L, 5L, 4L, 5L, 5L, 1L, 2L, 4L, 1L, 1L, 1L, 4L, 5L, 3L, 3L, 4L, 2L, 5L, 2L, 3L, 2L, 3L, 5L, 3L, 5L, 5L, 3L, 3L, 4L, 1L, 3L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 3L, 3L, 2L, 3L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 1L, 1L, 5L, 1L, 5L, 1L, 1L, 3L, 3L, 3L, 4L, 2L, 2L, 3L, 3L, 5L, 1L, 5L)), sample_cov = NULL, sample_nobs = NULL, rotation = "varimax", rotation.args = list(), bounds = "pos.var", cmd = "sem", estimator = "WLSMV", ordered = c("x1", "x2", "x3", "x4", "x5", "x6"), missing = "available.cases", slot.sample.stats = new("lavSampleStats", var = list(c(1, 1, 1, 1, 1, 1)), cov = list(c(1, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, -0.0528665611502654, 0.847708645568633, 1, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, 0.852266877770598, 0.866098037290729, 1, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, -0.045025067439856, -0.00562422746118933, -0.0468064624916715, 1, 0.854835831983838, 0.8624962089988, 0.0187792727635132, 0.0637607092511551, 0.0271693531291436, 0.854835831983838, 1, 0.864362516433594, -0.0528665611502654, 0.00299593013986168, -0.0307059937186903, 0.8624962089988, 0.864362516433594, 1)), mean = list( c(0, 0, 0, 0, 0, 0)), th = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951)), th.idx = list( c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 6L, 6L, 6L, 6L)), th.names = list(c("x1|t1", "x1|t2", "x1|t3", "x1|t4", "x2|t1", "x2|t2", "x2|t3", "x2|t4", "x3|t1", "x3|t2", "x3|t3", "x3|t4", "x4|t1", "x4|t2", "x4|t3", "x4|t4", "x5|t1", "x5|t2", "x5|t3", "x5|t4", "x6|t1", "x6|t2", "x6|t3", "x6|t4")), res.cov = list(NULL), res.var = list( NULL), res.th = list(NULL), res.th.nox = list(NULL), res.slopes = list(NULL), res.int = list(NULL), mean.x = list( NULL), cov.x = list(NULL), bifreq = list(NULL), group.w = list( 1), nobs = list(300L), ntotal = 300L, ngroups = 1L, x.idx = list(integer(0)), icov = list(NULL), cov.log.det = list( NULL), res.icov = list(NULL), res.cov.log.det = list( NULL), ridge = 0, WLS.obs = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, -0.0528665611502654, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, 0.854835831983838, 0.8624962089988, 0.864362516433594)), WLS.V = list(NULL), WLS.VD = list(c(0.45383482142755, 0.587709518619898, 0.591395244765584, 0.435865310988534, 0.458128368522494, 0.593178170698077, 0.575667399853721, 0.486139871182117, 0.470559146996906, 0.589572474383863, 0.587709518619898, 0.440480678601174, 0.435865310988534, 0.601506349600645, 0.583861633032411, 0.449463546185201, 0.489866730490175, 0.598291135869332, 0.569072720318582, 0.466488951106186, 0.500662923226088, 0.589572474383863, 0.579848639230085, 0.514201673558285, 7.44280585633078, 6.75326246420858, 0.68465337775283, 0.747098037875909, 0.711965105740159, 11.6264723451673, 0.71957812751013, 0.780476688725976, 0.738014115692331, 0.688027249018883, 0.764993477317059, 0.751303879951114, 8.27390801013265, 8.47099984869401, 10.1221593413523)), NACOV = list(c(2.20344484994446, 1.2774226485315, 0.608464081144384, 0.438580200934569, 1.24211958837833, 1.06100103747073, 0.579645270096896, 0.476730975188745, 1.17367332415033, 1.00896404529906, 0.601140069897175, 0.44176715543208, -0.219015644772081, -0.0242678714026954, -0.0379083822845332, 0.079081810080948, -0.0564610061408481, -0.120072924149705, 0.107363949033218, 0.109435686051998, -0.169568169571692, -0.238028958705595, -0.0135053916825915, -0.0269051436957956, 0.148317263761989, 0.15574465153135, -0.0301086318650708, 0.00933114409349929, -0.0308508864967571, 0.110777263526235, 0.00948677799058494, -0.00412089339286978, -0.10125465414037, 0.0785862105655183, 0.0555335781266458, -0.0638553156597295, -0.0280957630388753, -0.00123067312283201, -0.0342607132374605, 1.2774226485315, 1.70152085055262, 0.810471242285935, 0.584186727382364, 1.14089096616285, 1.11498605030749, 0.74527622661719, 0.635003375993402, 1.06755750714773, 1.03707982565867, 0.748585766358322, 0.588431735511437, -0.195764701197282, -0.057578351381687, -0.0504937836682346, -0.0373067097809645, 0.0599296137472571, -0.0417199784040522, 0.0501041505326083, 0.0809914034723241, -0.102201933410529, -0.130802860893886, -0.0148660064484897, 0.0449437782925636, 0.0741651928462058, 0.0490907248507851, -0.0176892046762685, 0.00394541784101921, -0.00847157050708947, 0.0757812257161068, -0.0661029519937833, -0.0252830371146104, -0.0476247917553443, -0.0264569477560322, 0.0323015886413371, -0.0169096775619646, -0.00652515275734159, -0.0245753162929485, -0.0110359863231057, 0.608464081144384, 0.810471242285935, 1.69091653822204, 1.21881067112823, 0.576674081941792, 0.774285253955362, 1.0792024722852, 1.05804201981214, 0.625589760454923, 0.815394330786237, 1.12783689455862, 1.15169768636051, 0.0136079556709071, 0.0243719568965317, -0.0184270459355523, -0.0493207998636407, 0.0858315089017964, 0.0837418857774159, -0.0113399097133595, 0.0479013123640107, 0.0827363125250564, -0.0337960621007554, -0.0540468233753761, 0.0344537680314544, -0.0835035702275452, -0.0786770150818312, 0.0106760261359684, -0.00123494659659294, 0.0122565252286696, -0.0592467719700587, -0.0412145589031354, -0.0176224865986117, -0.0380983101009663, -0.0402960408343714, -0.0522514103795643, -0.0445701055393561, 0.0398832411621319, 0.005478944302505, 0.0388495658350893, 0.438580200934569, 0.584186727382364, 1.21881067112823, 2.29428673213755, 0.441666799275109, 0.594893883378979, 1.19451162375741, 1.29095297173797, 0.450924370633182, 0.587735283838845, 1.16371239045051, 1.39753600268651, 0.0789137392518928, 0.0110390707298294, -0.146050804979038, -0.157518417294168, 0.0198461232749442, -0.0386675911959832, -0.106723079606281, 0.0285854186705204, -0.00626559185412115, -0.0310691387157628, -0.135030448940603, -0.116121963366209, -0.159334208125366, -0.139085742363334, 0.0271974707303992, -0.0071037068500013, 0.0263069574461733, -0.128992483494249, 0.107707346627344, 0.0946179973328222, 0.127452670358713, 0.110027033838194, 0.0789431409081486, 0.0904561706745593, 0.00997923231952932, -0.00851490425935088, 0.020452480807499, 1.24211958837833, 1.14089096616285, 0.576674081941792, 0.441666799275109, 2.18279431859916, 1.25161307106614, 0.58372464286605, 0.480086067447278, 1.29726260924579, 0.984812668193073, 0.605370716739469, 0.444876182620165, -0.170594704793659, -0.000939948520669462, -0.099353327882025, -0.121499556217292, 0.120824019421084, 0.0113621668615782, -0.0729739856394577, -0.0317318220007143, -0.0866730771247237, -0.174358692112653, -0.0760810863132528, -0.0604073968525699, 0.16194297708138, 0.120827352177701, -0.0919049501204477, -0.0267557831346448, -0.0881523522151011, 0.128137179839506, 0.000212298869746207, 0.0367164551098905, -0.00373340788228093, -0.000447770974788038, 0.0150078675242675, -0.0585860797001331, -0.0031712854387501, -0.0178213100814595, -0.00791788041762326, 1.06100103747073, 1.11498605030749, 0.774285253955362, 0.594893883378979, 1.25161307106614, 1.68583412100813, 0.786235732883992, 0.64664191532757, 1.13913953707982, 1.17862045059145, 0.81539146061268, 0.599216695337057, -0.134627822737602, -0.0578543768292243, -0.0254499315393859, -0.0184196260647881, 0.0394524588887727, -0.0165793698112683, 0.0190914135644343, 0.169073277814853, -0.057167462611575, -0.154022807307125, 0.0880784013810653, 0.0342100668274375, 0.0539361700938887, 0.0615567447500341, -0.0681981562446394, -0.0246495398767953, -0.0554549756281441, 0.0717566895580845, 5.75617068663093e-06, 0.0204479578807549, 7.74832431628764e-05, 0.00318648418314011, 0.0406344952019763, 0.00971501942601362, -0.00345081806988481, -0.0155256161093073, 0.0078896468194146, 0.579645270096895, 0.74527622661719, 1.0792024722852, 1.19451162375741, 0.58372464286605, 0.786235732883992, 1.73711417435502, 1.42869471567676, 0.595959822290149, 0.670001492928105, 1.18493558332661, 1.16630442958261, 0.163795908274427, 0.109091022310938, -0.00540981015134475, -1.57046074786481e-16, 0.102731959227697, 0.146522255839915, 0.0252065688162364, 0.138836295431548, 0.0964684652932333, 0.0827491883696062, 0.120136315645039, -0.00321012859252077, -0.0858800421247186, -0.0451906419084792, -0.0765124055981449, -0.0495654183174262, -0.0848028980005815, -0.0833098166158672, -0.000535439721952539, -0.0120376783586505, 0.00713013186502567, 0.00519137622969441, 0.0317853983114957, 0.0120483492539913, 0.0335091835712613, -0.0158877338895445, 0.0458021905858184, 0.476730975188745, 0.635003375993402, 1.05804201981214, 1.29095297173797, 0.480086067447278, 0.64664191532757, 1.42869471567676, 2.05702115641813, 0.490148927129519, 0.571882388380539, 1.21484756042805, 1.46125569212401, 0.212680617707058, 0.145119741737691, -0.0165152518961889, -0.0882562149935091, 0.206218263545022, 0.166099245009795, -0.00386514223473117, 0.0174182527862748, 0.0997440147141751, 0.103034832027179, 0.0653127512676339, -0.0071150608221477, -0.134071027660114, -0.0976632797843361, -0.137740647801462, -0.129333918235308, -0.117770415220244, -0.155270199765802, 0.00279700652525927, -0.029357693070375, 0.00385735432182198, -0.0242062457633788, -0.0532930035886563, -0.00857750561667388, 0.0767430961264705, -0.00352146452370503, 0.0679798285981358, 1.17367332415033, 1.06755750714773, 0.625589760454923, 0.450924370633182, 1.29726260924579, 1.13913953707982, 0.595959822290149, 0.49014892712952, 2.1251313599618, 1.30132191861677, 0.618059609401317, 0.454201024362567, -0.241597776915651, -0.0362922311272902, -0.098028891044111, -0.142411540832355, 0.0448569291718996, -0.0239915790387723, -0.0385217266559336, 0.0430732015144227, -0.111115021635821, -0.132288435076582, -0.0047687613849894, -0.0301359480319713, 0.138783846835874, 0.13451304238041, -0.0723053721025387, 0.0235559639025693, -0.0229809041838941, 0.14579926213725, -0.0346675510650626, 0.0278921595163239, -0.0029584179876469, -0.0143270955539256, 0.0186565372953722, -0.0162965216843151, -0.00917673037167745, 0.00379043849646447, 0.00436030761914487, 1.00896404529906, 1.03707982565867, 0.815394330786237, 0.587735283838845, 0.984812668193073, 1.17862045059145, 0.670001492928105, 0.571882388380539, 1.30132191861677, 1.69614431380138, 0.805579524235362, 0.592006077646191, -0.0849566905132264, 0.0345326507924104, -0.042071892364949, -0.0309553186878741, 0.119344126776945, 0.0764956513097508, -0.0235887381762751, 0.0516400329150373, 0.0202881363683058, -0.0352304618528652, -0.0595609077281687, 0.0516911215418863, 0.0687933674969333, 0.0369020237224323, 0.00995076809763176, 0.064092949342599, 0.0369408306412495, 0.0799479942345352, 0.005592058134837, 0.0487302938257757, 0.0493669036835191, -0.0138630042221855, 0.00884439739842633, -0.00367260312735112, 0.0351601326522669, 0.00839475638588036, 0.0119231550404147, 0.601140069897175, 0.748585766358322, 1.12783689455862, 1.16371239045051, 0.605370716739469, 0.81539146061268, 1.18493558332661, 1.21484756042805, 0.618059609401317, 0.805579524235362, 1.70152085055262, 1.2504174379618, 0.118080295960265, 0.0828320142683918, -0.133598135955537, -0.186533548904822, 0.0732473056910928, 0.0671589896260352, -0.104565183720226, 0.0255762326754712, 0.0375171654291813, -0.0508677792365115, -0.0647733138112737, -0.0137328211449501, -0.0724591490523034, -0.0791267384446038, 0.00181309216736721, -0.0214221821010069, -0.0300017587548346, -0.0877579746528331, 0.10479954023783, 0.0704790601404688, 0.0725730814762955, 0.0132397293060142, 0.00392597583562099, 0.00574676565142401, 0.0545645893278382, 0.00351526032811938, 0.0482644269885699, 0.44176715543208, 0.588431735511437, 1.15169768636051, 1.39753600268651, 0.444876182620165, 0.599216695337057, 1.16630442958261, 1.46125569212401, 0.454201024362567, 0.592006077646191, 1.2504174379618, 2.27024713813936, 0.200952889275185, -0.0133620970402425, -0.0788523417871815, -0.219328304783088, 0.176164832903571, 0.0493539480970899, -0.116865540995329, 0.0187955189173209, 0.00380285492607957, -0.0183094663189546, -0.0671092644366832, -0.0330283840404653, -0.139306280370751, -0.13875441713431, 0.0668223880050227, -0.0448927653441914, 0.0318365551567394, -0.151806904210309, 0.148960920619109, 0.0609038763998929, 0.134305485249476, 0.031169280380637, -0.0100546599966053, 0.0170376579092655, 0.0337745421542386, -0.000211240075709474, 0.0322855829479996, -0.219015644772081, -0.195764701197282, 0.0136079556709071, 0.0789137392518928, -0.170594704793659, -0.134627822737602, 0.163795908274427, 0.212680617707058, -0.241597776915651, -0.0849566905132264, 0.118080295960265, 0.200952889275185, 2.29428673213755, 1.15558999503623, 0.577148887654197, 0.435492094872112, 1.27015188959644, 1.06222147579554, 0.553093374537492, 0.447838225838153, 1.35577768351094, 1.11397687818633, 0.570187169159342, 0.488208361335366, -0.0452073659278695, -0.0368039242195606, -0.0249465575779013, -0.157562953805574, -0.0510773841561005, -0.0144087480818, -0.000875250301410177, -0.102613201353469, 0.000573271171747722, -0.0360467188781403, -0.106138266021219, -0.00157974786814207, 0.155628564410312, 0.153818992474422, 0.166944494374591, -0.0242678714026954, -0.057578351381687, 0.0243719568965317, 0.0110390707298294, -0.000939948520669464, -0.0578543768292243, 0.109091022310938, 0.145119741737691, -0.0362922311272901, 0.0345326507924104, 0.0828320142683918, -0.0133620970402424, 1.15558999503623, 1.66249284095492, 0.830316892679672, 0.626521943879109, 0.974188874780071, 1.1002507213572, 0.742943487462754, 0.64428374039232, 1.10176290111632, 1.11577341589458, 0.743140939070639, 0.702362350920955, -0.0228496292950282, -0.00169230710749049, -0.0100558231103412, -0.00378787104048013, -0.0243505783648102, 0.0045802720538116, 0.0072931844882099, 0.0359904807552618, -0.0170014618557995, -0.0151073514301341, 0.0160490751802889, 0.00744705291894205, 0.0506965702279097, 0.0646531323927172, 0.0136332585073733, -0.0379083822845332, -0.0504937836682345, -0.0184270459355523, -0.146050804979038, -0.099353327882025, -0.0254499315393859, -0.00540981015134475, -0.0165152518961889, -0.098028891044111, -0.042071892364949, -0.133598135955537, -0.0788523417871815, 0.577148887654197, 0.830316892679671, 1.71273456487676, 1.29235692829569, 0.631548022402756, 0.768991594381702, 1.17427537880214, 1.1139472986559, 0.644167387922915, 0.76968868646083, 1.18316692085857, 1.25985049764384, -0.0497100849928933, 0.0114243324019316, 0.0145262770963222, 0.0972680602138176, 0.0637726699623928, 0.012559878300944, -0.00486631793652915, 0.0635513532398554, 0.0254927803908756, 0.00644936625016048, 0.0984423108227788, 0.0677157657287604, -0.0765907638253904, -0.07315026181056, -0.0918071222196781, 0.0790818100809479, -0.0373067097809646, -0.0493207998636407, -0.157518417294168, -0.121499556217292, -0.0184196260647881, -1.83037594978595e-16, -0.0882562149935091, -0.142411540832355, -0.0309553186878741, -0.186533548904822, -0.219328304783088, 0.435492094872112, 0.626521943879109, 1.29235692829569, 2.22487453874168, 0.476539376877921, 0.618983350337493, 1.14976137667066, 1.42361294424794, 0.486061415374205, 0.600533182544757, 1.05121838213894, 1.15403067874422, -0.0158659044150101, 0.0563346056670746, 0.0236919740312106, 0.103285956119985, -0.000130894536512416, 0.0205212058726693, -0.007320814773629, 0.0875644703300589, -0.00850467831901114, 0.0127667492155082, 0.17068413621789, 0.0662442892600502, -0.152316211916453, -0.145043021521224, -0.119582194867943, -0.056461006140848, 0.0599296137472572, 0.0858315089017964, 0.0198461232749443, 0.120824019421084, 0.0394524588887727, 0.102731959227697, 0.206218263545022, 0.0448569291718996, 0.119344126776945, 0.0732473056910928, 0.176164832903571, 1.27015188959644, 0.974188874780071, 0.631548022402756, 0.476539376877921, 2.04137153588563, 1.28678875419635, 0.605225158300069, 0.490049191698183, 1.2559069292527, 1.04757622393096, 0.623930127537152, 0.534224411962442, -0.00822479371015104, 0.00663271019471845, 0.019465008972702, 0.00885836454286383, 0.0422893759118978, 0.00923383989163264, 0.0428107979498749, 0.0357418739580545, 0.142453716502339, 0.0307344604466001, 0.0109412500742362, 0.0843708232885414, 0.134776830038491, 0.118952680023042, 0.141748124176178, -0.120072924149705, -0.0417199784040522, 0.0837418857774159, -0.0386675911959832, 0.0113621668615782, -0.0165793698112683, 0.146522255839915, 0.166099245009794, -0.0239915790387723, 0.0764956513097508, 0.0671589896260352, 0.0493539480970899, 1.06222147579554, 1.1002507213572, 0.768991594381703, 0.618983350337493, 1.28678875419635, 1.67142706961048, 0.786135027597283, 0.636531428934211, 1.09154115621558, 1.11501277174014, 0.758613312330241, 0.693911211524711, -0.00264628084991393, -0.020670859392103, 0.0206585540721674, 0.0076120270915056, 0.01977840827582, 0.00887062962888688, 0.0857746926208271, 0.0129649274588139, 0.0930336131142227, 0.0639141756310739, 0.00174847079953262, 0.0826773995441732, 0.0577716250034614, 0.0240332716358964, 0.062104419291224, 0.107363949033218, 0.0501041505326083, -0.0113399097133595, -0.106723079606281, -0.0729739856394577, 0.0190914135644343, 0.0252065688162364, -0.00386514223473116, -0.0385217266559336, -0.0235887381762751, -0.104565183720226, -0.116865540995329, 0.553093374537492, 0.742943487462754, 1.17427537880214, 1.14976137667066, 0.605225158300069, 0.786135027597283, 1.75724466187761, 1.42283630209259, 0.549741259193713, 0.708475550052955, 1.22914973668607, 1.25763749578798, -0.0296908946602319, 0.0104200414391291, -0.0145720736487281, 0.0033195334097242, 0.0304989245705094, 0.0248134478800154, 0.019809047212115, -0.0278335902754632, 0.0775381432887526, 0.0170624923090307, -0.00828708360663368, 0.0575131343085677, -0.0862221610584902, -0.0960292154420592, -0.121941490751061, 0.109435686051998, 0.0809914034723241, 0.0479013123640107, 0.0285854186705205, -0.0317318220007143, 0.169073277814853, 0.138836295431548, 0.0174182527862748, 0.0430732015144227, 0.0516400329150374, 0.0255762326754712, 0.0187955189173209, 0.447838225838153, 0.64428374039232, 1.1139472986559, 1.42361294424794, 0.490049191698183, 0.636531428934211, 1.42283630209259, 2.14367349457838, 0.499841178456957, 0.617558201846951, 1.24599523308296, 1.40112741396321, -0.0394721249953512, 0.0370330313771152, -0.0431359339076604, -0.00738449211276925, -0.0854782307059588, 0.0247920992730687, -0.0973040204633906, -0.0424219899345994, -0.10773335775287, -0.0699475831262572, -0.0137548007419955, -0.0746340366111427, -0.14926687959738, -0.122855476743761, -0.153408764961069, -0.169568169571692, -0.102201933410529, 0.0827363125250564, -0.00626559185412116, -0.0866730771247237, -0.057167462611575, 0.0964684652932333, 0.0997440147141751, -0.111115021635821, 0.0202881363683058, 0.0375171654291814, 0.00380285492607959, 1.35577768351094, 1.10176290111632, 0.644167387922915, 0.486061415374205, 1.2559069292527, 1.09154115621558, 0.549741259193713, > test-esem.R: 0.499841178456957, 1.99735181817812, 1.37283056092203, 0.636397275021004, 0.544899092090007, -0.03708872669238, -0.00935414748115647, -0.00786735696938561, -0.0369559317351903, -0.0235867391754614, 0.00555327458708414, -0.0315362339684262, 0.00408552460269166, -0.000542481453965008, -0.0349182900330659, -0.0522477483772834, -0.0194906592088833, 0.0890398368213926, 0.131204656804499, 0.153319351221939, -0.238028958705595, -0.130802860893886, -0.0337960621007554, -0.0310691387157628, -0.174358692112653, -0.154022807307125, 0.0827491883696063, 0.103034832027179, -0.132288435076582, -0.0352304618528652, -0.0508677792365115, -0.0183094663189545, 1.11397687818633, 1.11577341589458, 0.76968868646083, 0.600533182544757, 1.04757622393096, 1.11501277174014, 0.708475550052955, 0.617558201846951, 1.37283056092203, 1.69614431380138, 0.786274468293161, 0.673227653107653, -0.0249870847892577, -0.0310623448791116, -0.0597662654253912, -0.0500516446493022, -0.0205554406398311, 0.00347675808841012, -0.0686655886007817, 0.00959998906957744, -0.00634275627248089, -0.0513443431595157, -0.00110780602245252, -0.0123907039927979, 0.0395883128666614, 0.0716961735842288, 0.0545351763997118, -0.0135053916825915, -0.0148660064484897, -0.0540468233753762, -0.135030448940603, -0.0760810863132528, 0.0880784013810652, 0.120136315645039, 0.0653127512676339, -0.00476876138498948, -0.0595609077281687, -0.0647733138112737, -0.0671092644366832, 0.570187169159342, 0.743140939070639, 1.18316692085857, 1.05121838213894, 0.623930127537152, 0.758613312330241, 1.22914973668607, 1.24599523308296, 0.636397275021004, 0.786274468293161, 1.72458799132095, 1.47663490650412, -0.0171591736580541, 0.0168446332834493, 0.0156862359188135, 0.033364333452295, 0.017604243021788, 0.0417778807218433, -0.0266860377378277, -0.00837804674737573, -0.00682932784787414, -0.0185360321639612, 0.00923449433845097, 0.0103019254283266, -0.0913713589057094, -0.0780111274536073, -0.103938786698107, -0.0269051436957957, 0.0449437782925636, 0.0344537680314544, -0.116121963366209, -0.0604073968525698, 0.0342100668274374, -0.00321012859252068, -0.0071150608221477, -0.0301359480319713, 0.0516911215418863, -0.0137328211449501, -0.0330283840404653, 0.488208361335366, 0.702362350920954, 1.25985049764384, 1.15403067874422, 0.534224411962442, 0.693911211524711, 1.25763749578798, 1.40112741396321, 0.544899092090007, 0.673227653107653, 1.47663490650412, 1.94476224295417, -0.0600572970215252, -0.0129462981571512, -0.0383334777746061, 0.0618573160951042, 0.0275218234991843, 0.0130731844584642, -0.0693311489782209, 0.0476073305366232, -0.00861177497025037, -0.104231047599455, -0.00601795258733618, 0.00995636294223921, -0.110540740333587, -0.122682130683992, -0.132968263756207, 0.148317263761989, 0.0741651928462058, -0.0835035702275452, -0.159334208125366, 0.161942977081381, 0.0539361700938887, -0.0858800421247186, -0.134071027660114, 0.138783846835874, 0.0687933674969333, -0.0724591490523034, -0.139306280370751, -0.0452073659278695, -0.0228496292950282, -0.0497100849928933, -0.0158659044150101, -0.00822479371015103, -0.00264628084991393, -0.0296908946602319, -0.0394721249953512, -0.03708872669238, -0.0249870847892577, -0.0171591736580541, -0.0600572970215252, 0.13435793157891, 0.0648999991313963, 0.0163257727891063, 0.0222001474813885, 0.00586415479170394, 0.0553201434932848, -0.00774333873252011, -0.00406552748573637, -0.00893407703646892, 0.00190480732538636, 0.00711445555663318, -0.00993507647126291, -0.00346764772535688, -0.00584038224322596, -0.0043281721243053, 0.15574465153135, 0.0490907248507852, -0.0786770150818312, -0.139085742363334, 0.120827352177701, 0.0615567447500341, -0.0451906419084792, -0.0976632797843361, 0.13451304238041, 0.0369020237224324, -0.0791267384446038, -0.13875441713431, -0.0368039242195606, -0.00169230710749049, 0.0114243324019316, 0.0563346056670746, 0.00663271019471846, -0.020670859392103, 0.0104200414391291, 0.0370330313771152, -0.00935414748115647, -0.0310623448791116, 0.0168446332834493, -0.0129462981571512, 0.0648999991313963, 0.148076578586997, 0.0102311998810714, 0.0360677109152718, 0.0157559499489283, 0.0471580164973155, -0.024660772824432, 0.00213812557707964, -0.0216906952994601, -0.0148339752411867, 0.018408323287891, -0.0189706498549756, -0.0118850547463466, -0.00878063137456458, -0.00695610027104775, -0.0301086318650708, -0.0176892046762685, 0.0106760261359684, 0.0271974707303992, -0.0919049501204477, -0.0681981562446394, -0.0765124055981449, -0.137740647801462, -0.0723053721025387, 0.00995076809763175, 0.00181309216736721, 0.0668223880050227, -0.0249465575779013, -0.0100558231103412, 0.0145262770963222, 0.0236919740312106, 0.0194650089727021, 0.0206585540721674, -0.0145720736487281, -0.0431359339076604, -0.00786735696938561, -0.0597662654253913, 0.0156862359188135, -0.0383334777746061, 0.0163257727891063, 0.0102311998810714, 1.46059310082162, 1.05092773064802, 1.14570089017992, -0.000204120425811351, 1.0924386835732, 0.800404470692711, 0.866078362448077, 1.06893041162047, 0.767172388010609, 0.812608776357063, 5.64931156303635e-06, 0.0102626772585488, 0.00490334272631464, 0.00933114409349929, 0.00394541784101922, -0.00123494659659295, -0.0071037068500013, -0.0267557831346448, -0.0246495398767953, -0.0495654183174262, -0.129333918235308, 0.0235559639025693, 0.064092949342599, -0.0214221821010069, -0.0448927653441914, -0.157562953805574, -0.00378787104048014, 0.0972680602138176, 0.103285956119985, 0.00885836454286384, 0.00761202709150559, 0.00331953340972421, -0.00738449211276925, -0.0369559317351903, -0.0500516446493022, 0.033364333452295, 0.0618573160951042, 0.0222001474813885, 0.0360677109152718, 1.05092773064801, 1.33851241644687, 1.0552643434031, 0.0164763439450202, 0.793710751295646, 1.05114166617281, 0.785239966039694, 0.790106915227831, 1.02177932037355, 0.772375497705721, -0.0457924736654755, -0.0294483813254788, -0.0249420219318624, -0.0308508864967572, -0.00847157050708947, 0.0122565252286696, 0.0263069574461733, -0.0881523522151011, -0.0554549756281442, -0.0848028980005815, -0.117770415220244, -0.0229809041838941, 0.0369408306412495, -0.0300017587548346, 0.0318365551567393, -0.0510773841561005, -0.0243505783648102, 0.0637726699623928, -0.000130894536512413, 0.0422893759118978, 0.01977840827582, 0.0304989245705094, -0.0854782307059588, -0.0235867391754614, -0.0205554406398311, 0.017604243021788, 0.0275218234991843, 0.00586415479170394, 0.0157559499489283, 1.14570089017992, 1.0552643434031, 1.40456321796895, 0.002375688741747, 0.854793847130113, 0.798909003312101, 1.08161905449057, 0.881489941991868, 0.812215657741097, 1.0699033568652, -0.0256936941471223, -0.0192954594118436, 0.00388272127596111, 0.110777263526235, 0.0757812257161068, -0.0592467719700587, -0.128992483494249, 0.128137179839506, 0.0717566895580845, -0.0833098166158672, -0.155270199765802, 0.14579926213725, 0.0799479942345352, -0.0877579746528331, -0.151806904210309, -0.0144087480818, 0.0045802720538116, 0.012559878300944, 0.0205212058726693, 0.00923383989163264, 0.00887062962888688, 0.0248134478800154, 0.0247920992730687, 0.00555327458708413, 0.00347675808841012, 0.0417778807218433, 0.0130731844584642, 0.0553201434932848, 0.0471580164973155, -0.000204120425811351, 0.0164763439450202, 0.002375688741747, 0.0860106118444142, -0.019900141742653, -0.00853341765654292, -0.0214039745610184, 0.00329365658923978, 0.018798081814193, 0.00581948595103035, -0.00488309654925988, 0.00560377528198599, -0.0120229152759623, 0.00948677799058492, -0.0661029519937833, -0.0412145589031353, 0.107707346627344, 0.000212298869746286, 5.75617068664727e-06, -0.000535439721952491, 0.00279700652525929, -0.0346675510650626, 0.005592058134837, 0.10479954023783, 0.148960920619109, -0.000875250301410178, 0.0072931844882099, -0.00486631793652915, -0.00732081477362901, 0.0428107979498749, 0.0857746926208272, 0.019809047212115, -0.0973040204633905, -0.0315362339684262, -0.0686655886007816, -0.0266860377378277, -0.0693311489782208, -0.00774333873252011, -0.024660772824432, 1.0924386835732, 0.793710751295646, 0.854793847130113, -0.019900141742653, 1.38970316324119, 0.981893200602164, 1.08597201729475, 1.11220858116664, 0.765698559147951, 0.82894666600568, 0.0142986764803992, 0.010614318885733, 0.0160737255995745, -0.0041208933928698, -0.0252830371146104, -0.0176224865986117, 0.0946179973328222, 0.0367164551098905, 0.0204479578807549, -0.0120376783586505, -0.029357693070375, 0.0278921595163239, 0.0487302938257758, 0.0704790601404688, 0.0609038763998929, -0.102613201353469, 0.0359904807552618, 0.0635513532398554, 0.0875644703300589, 0.0357418739580544, 0.0129649274588139, -0.0278335902754632, -0.0424219899345994, 0.00408552460269165, 0.00959998906957744, -0.00837804674737573, 0.0476073305366232, -0.00406552748573637, 0.00213812557707964, 0.800404470692711, 1.05114166617281, 0.798909003312101, -0.00853341765654293, 0.981893200602164, 1.28126824855252, 0.953252779725438, 0.79984192501233, 1.00662688239373, 0.729381828929068, -0.0329019063108192, -0.0136956271030428, -0.0107407756452412, -0.10125465414037, -0.0476247917553443, -0.0380983101009663, 0.127452670358713, -0.00373340788228093, 7.74832431628925e-05, 0.00713013186502569, 0.00385735432182198, -0.00295841798764691, 0.0493669036835192, 0.0725730814762955, 0.134305485249476, 0.000573271171747709, -0.0170014618557995, 0.0254927803908756, -0.00850467831901116, 0.142453716502339, 0.0930336131142227, 0.0775381432887526, -0.10773335775287, -0.000542481453965015, -0.0063427562724809, -0.00682932784787413, -0.00861177497025037, -0.00893407703646892, -0.0216906952994601, 0.866078362448077, 0.785239966039694, 1.08161905449057, -0.0214039745610184, 1.08597201729475, 0.953252779725438, 1.35498763334885, 0.910480398190892, 0.75340726253597, 1.0564303582682, 0.00579222433398088, -0.00895211036399707, 0.0266774382853429, 0.0785862105655182, -0.0264569477560322, -0.0402960408343714, 0.110027033838194, -0.000447770974788044, 0.00318648418314012, 0.00519137622969441, -0.0242062457633788, -0.0143270955539256, -0.0138630042221855, 0.0132397293060142, 0.031169280380637, -0.0360467188781403, -0.0151073514301341, 0.0064493662501605, 0.0127667492155082, 0.0307344604466001, 0.0639141756310739, 0.0170624923090307, -0.0699475831262572, -0.0349182900330659, -0.0513443431595157, -0.0185360321639612, -0.104231047599455, 0.00190480732538636, -0.0148339752411867, 1.06893041162047, 0.790106915227831, 0.881489941991868, 0.00329365658923978, 1.11220858116664, 0.79984192501233, 0.910480398190892, 1.45343080732047, 1.05062470048119, 1.10783285444028, 0.00482548296748707, 0.0192021029400786, 0.0155516790039065, 0.0555335781266458, 0.0323015886413371, -0.0522514103795643, 0.0789431409081487, 0.0150078675242675, 0.0406344952019763, 0.0317853983114957, -0.0532930035886563, 0.0186565372953721, 0.00884439739842633, 0.00392597583562098, -0.0100546599966053, -0.106138266021218, 0.0160490751802889, 0.0984423108227788, 0.17068413621789, 0.0109412500742362, 0.00174847079953263, -0.00828708360663369, -0.0137548007419955, -0.0522477483772834, -0.00110780602245253, 0.00923449433845097, -0.00601795258733618, 0.00711445555663318, 0.018408323287891, 0.76717238801061, 1.02177932037355, 0.812215657741097, 0.018798081814193, 0.765698559147951, 1.00662688239373, 0.75340726253597, 1.05062470048119, 1.30720068817729, 1.01913616621123, -0.0536652115645841, -0.019213861470815, -0.0172908302087426, -0.0638553156597295, -0.0169096775619646, -0.0445701055393561, 0.0904561706745593, -0.0585860797001331, 0.00971501942601363, 0.0120483492539913, -0.00857750561667388, -0.0162965216843151, -0.00367260312735112, 0.00574676565142401, 0.0170376579092655, -0.00157974786814208, 0.00744705291894205, 0.0677157657287604, 0.0662442892600502, 0.0843708232885414, 0.0826773995441732, 0.0575131343085677, -0.0746340366111427, -0.0194906592088833, -0.0123907039927979, 0.0103019254283266, 0.00995636294223919, -0.00993507647126291, -0.0189706498549756, 0.812608776357063, 0.772375497705721, 1.0699033568652, 0.00581948595103035, 0.82894666600568, 0.729381828929068, 1.0564303582682, 1.10783285444028, 1.01913616621123, 1.33101934741115, -0.0160332825788463, -0.0194673047264479, 0.0076134333416248, -0.0280957630388753, -0.00652515275734159, 0.0398832411621319, 0.00997923231952932, -0.00317128543875011, -0.00345081806988481, 0.0335091835712613, 0.0767430961264705, -0.00917673037167745, 0.0351601326522669, 0.0545645893278382, 0.0337745421542386, 0.155628564410312, 0.0506965702279097, -0.0765907638253904, -0.152316211916453, 0.134776830038491, 0.0577716250034614, -0.0862221610584902, -0.14926687959738, 0.0890398368213926, 0.0395883128666614, -0.0913713589057094, -0.110540740333588, -0.00346764772535688, -0.0118850547463466, 5.64931156303779e-06, -0.0457924736654755, -0.0256936941471223, -0.00488309654925988, 0.0142986764803992, -0.0329019063108192, 0.00579222433398088, 0.00482548296748707, -0.0536652115645841, -0.0160332825788463, 0.120861870687388, 0.0659352781421284, 0.0637822024211485, -0.00123067312283201, -0.0245753162929485, 0.005478944302505, -0.00851490425935088, -0.0178213100814595, -0.0155256161093073, -0.0158877338895445, -0.00352146452370504, 0.00379043849646447, 0.00839475638588036, 0.00351526032811938, -0.00021124007570947, 0.153818992474422, 0.0646531323927172, -0.07315026181056, -0.145043021521224, 0.118952680023042, 0.0240332716358964, -0.0960292154420592, -0.122855476743761, 0.131204656804499, 0.0716961735842288, -0.0780111274536073, -0.122682130683992, -0.00584038224322596, -0.00878063137456458, 0.0102626772585488, -0.0294483813254788, -0.0192954594118436, 0.00560377528198599, 0.010614318885733, -0.0136956271030428, -0.00895211036399707, 0.0192021029400786, -0.019213861470815, -0.0194673047264479, 0.0659352781421284, 0.118049819131347, 0.0482278273076368, -0.0342607132374605, -0.0110359863231057, 0.0388495658350893, 0.020452480807499, -0.00791788041762326, 0.0078896468194146, 0.0458021905858184, 0.0679798285981358, 0.00436030761914487, 0.0119231550404147, 0.0482644269885699, 0.0322855829479996, 0.166944494374591, 0.0136332585073733, -0.0918071222196781, -0.119582194867943, 0.141748124176178, 0.0621044192912241, -0.121941490751061, -0.153408764961069, 0.153319351221939, 0.0545351763997117, -0.103938786698107, -0.132968263756207, -0.00432817212430529, -0.00695610027104775, 0.00490334272631464, -0.0249420219318624, 0.00388272127596111, -0.0120229152759623, 0.0160737255995745, -0.0107407756452412, 0.0266774382853429, 0.0155516790039065, -0.0172908302087426, 0.0076134333416248, 0.0637822024211485, 0.0482278273076368, 0.0987931493939915)), NACOV.user = FALSE, missing.flag = FALSE, missing = list(NULL), missing.h1 = list( NULL), YLp = list(NULL), zero.cell.tables = list( c("x1", "x1", "x2", "x4", "x4", "x5", "x2", "x3", "x3", "x5", "x6", "x6"))), model.type = "sem") > test-esem.R: > test-esem.R: 10: eval(sc, parent.frame()) > test-esem.R: 11: eval(sc, parent.frame()) > test-esem.R: 12: sem(model = c("efa(\"efa\")*f1 =~ x1 + x2 + x3 + x4 + x5 + x6", "efa(\"efa\")*f2 =~ x1 + x2 + x3 + x4 + x5 + x6", "efa(\"efa\")*f3 =~ x1 + x2 + x3 + x4 + x5 + x6"), data = list(x1 = c(5L, 3L, 4L, 4L, 3L, 4L, 4L, 3L, 5L, 2L, 4L, 5L, 3L, 3L, 3L, 4L, 2L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 4L, 3L, 5L, 1L, 1L, 2L, 1L, 3L, 4L, 2L, 3L, 3L, 1L, 3L, 1L, 5L, 3L, 4L, 4L, 2L, 5L, 4L, 4L, 3L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 5L, 3L, 5L, 4L, 5L, 3L, 4L, 2L, 3L, 4L, 1L, 3L, 3L, 3L, 4L, 1L, 1L, 5L, 3L, 4L, 3L, 2L, 3L, 3L, 3L, 4L, 4L, 5L, 2L, 4L, 5L, 1L, 1L, 1L, 1L, 3L, 4L, 5L, 5L, 1L, 5L, 1L, 3L, 2L, 2L, 3L, 3L, 3L, 4L, 2L, 2L, 1L, 2L, 3L, 5L, 1L, 3L, 1L, 2L, 3L, 2L, 3L, 3L, 3L, 1L, 1L, 3L, 4L, 3L, 3L, 4L, 5L, 2L, 3L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 1L, 5L, 2L, 2L, 4L, 1L, 2L, 1L, 5L, 3L, 1L, 1L, 3L, 3L, 3L, 5L, 3L, 1L, 3L, 3L, 4L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 1L, 5L, 5L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 1L, 3L, 4L, 2L, 2L, 3L, 3L, 4L, 1L, 2L, 4L, 2L, 3L, 5L, 3L, 1L, 4L, 5L, 5L, 1L, 1L, 2L, 2L, 3L, 3L, 1L, 5L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 2L, 3L, 2L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 3L, 5L, 1L, 3L, 1L, 2L, 5L, 3L, 4L, 1L, 3L, 4L, 4L, 5L, 1L, 5L, 4L, 2L, 5L, 2L, 1L, 3L, 1L, 3L, 5L, 1L, 3L, 3L, 2L, 2L, 4L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 1L, 4L, 4L, 3L, 3L, 3L, 3L, 4L, 3L, 2L, 5L, 4L, 3L, 2L, 3L, 3L, 3L, 5L, 5L, 2L, 1L, 4L, 2L, 5L, 2L, 5L, 2L, 3L, 3L, 4L, 4L, 2L), x2 = c(5L, 2L, 3L, 3L, 5L, 1L, 5L, 3L, 5L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 3L, 1L, 1L, 5L, 3L, 1L, 2L, 5L, 5L, 3L, 2L, 1L, 3L, 3L, 4L, 5L, 5L, 2L, 4L, 1L, 2L, 3L, 1L, 2L, 3L, 2L, 5L, 2L, 1L, 4L, 1L, 5L, 3L, 4L, 4L, 3L, 5L, 3L, 3L, 3L, 5L, 4L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 5L, 3L, 4L, 5L, 1L, 2L, 4L, 3L, 3L, 4L, 5L, 4L, 2L, 1L, 5L, 3L, 3L, 3L, 1L, 5L, 3L, 5L, 5L, 5L, 5L, 2L, 4L, 5L, 2L, 2L, 1L, 2L, 3L, 3L, 5L, 5L, 2L, 5L, 1L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 2L, 1L, 2L, 1L, 5L, 1L, 3L, 2L, 1L, 4L, 3L, 3L, 3L, 2L, 1L, 1L, 3L, 4L, 3L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 3L, 2L, 1L, 2L, 1L, 3L, 5L, 2L, 2L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 3L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 4L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 3L, 3L, 3L, 3L, 2L, 3L, 3L, 3L, 1L, 4L, 3L, 1L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 4L, 4L, 5L, 5L, 1L, 3L, 4L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 1L, 5L, 3L, 3L, 4L, 3L, 3L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 3L, 4L, 1L, 3L, 3L, 2L, 5L, 3L, 3L, 2L, 1L, 5L, 5L, 5L, 1L, 5L, 4L, 3L, 5L, 1L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 1L, 1L, 5L, 4L, 3L, 1L, 3L, 4L, 3L, 2L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 4L, 2L, 4L, 5L, 5L, 1L, 2L, 3L, 3L, 3L, 5L, 2L, 1L, 2L, 2L, 4L, 3L, 5L, 3L, 3L, 2L, 3L, 3L, 1L), x3 = c(5L, 2L, 3L, 4L, 4L, 3L, 4L, 4L, 5L, 3L, 4L, 5L, 1L, 3L, 3L, 4L, 4L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 4L, 2L, 3L, 1L, 4L, 3L, 3L, 4L, 5L, 3L, 3L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 4L, 2L, 1L, 4L, 3L, 5L, 2L, 4L, 3L, 2L, 5L, 3L, 3L, 3L, 5L, 2L, 1L, 3L, 3L, 3L, 5L, 5L, 1L, 4L, 3L, 5L, 4L, 5L, 2L, 3L, 3L, 1L, 1L, 4L, 4L, 5L, 2L, 2L, 5L, 3L, 3L, 3L, 1L, 4L, 4L, 2L, 5L, 4L, 5L, 2L, 4L, 5L, 1L, 2L, 1L, 2L, 3L, 4L, 4L, 4L, 2L, 5L, 2L, 3L, 3L, 3L, 3L, 2L, 4L, 3L, 3L, 1L, 1L, 2L, 1L, 5L, 2L, 3L, 1L, 2L, 2L, 2L, 3L, 3L, 2L, 1L, 1L, 4L, 5L, 1L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 3L, 3L, 2L, 1L, 3L, 3L, 4L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 2L, 2L, 5L, 2L, 3L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 3L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 4L, 4L, 3L, 4L, 2L, 3L, 4L, 3L, 1L, 3L, 3L, 1L, 1L, 3L, 3L, 4L, 1L, 2L, 4L, 3L, 4L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 1L, 1L, 3L, 2L, 1L, 5L, 3L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 4L, 3L, 2L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 2L, 4L, 2L, 3L, 3L, 3L, 5L, 3L, 4L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 5L, 3L, 4L, 2L, 1L, 3L, 2L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 3L, 4L, 3L, 1L, 3L, 4L, 5L, 3L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 5L, 5L, 5L, 1L, 2L, 3L, 3L, 4L, 5L, 1L, 1L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 4L, 3L, 1L), x4 = c(3L, 4L, 3L, 5L, 3L, 3L, 4L, 4L, 2L, 2L, 3L, 3L, 2L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 2L, 5L, 3L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 4L, 2L, 2L, 4L, 5L, 3L, 1L, 1L, 3L, 2L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 1L, 3L, 3L, 5L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 2L, 1L, 2L, 1L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 4L, 5L, 3L, 5L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 2L, 2L, 3L, 5L, 4L, 3L, 3L, 3L, 2L, 3L, 4L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 2L, 2L, 1L, 3L, 1L, 5L, 4L, 1L, 2L, 2L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 3L, 5L, 1L, 2L, 2L, 5L, 5L, 3L, 5L, 3L, 5L, 3L, 5L, 3L, 2L, 4L, 1L, 2L, 3L, 2L, 3L, 2L, 5L, 4L, 5L, 2L, 5L, 5L, 4L, 1L, 1L, 3L, 5L, 5L, 1L, 2L, 4L, 1L, 4L, 1L, 3L, 2L, 2L, 3L, 3L, 4L, 3L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 3L, 5L, 3L, 3L, 3L, 5L, 3L, 4L, 5L, 2L, 4L, 3L, 5L, 4L, 2L, 4L, 2L, 3L, 3L, 2L, 1L, 4L, 4L, 2L, 2L, 3L, 5L, 5L, 1L, 2L, 4L, 3L, 5L, 3L, 4L, 3L, 5L, 4L, 1L, 2L, 5L, 1L, 1L, 1L, 2L, 3L, 2L, 3L, 2L, 3L, 5L, 1L, 2L, 3L, 3L, 5L, 4L, 4L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 5L, 1L, 5L, 1L, 5L, 3L, 5L, 4L, 2L, 1L, 4L, 3L, 2L, 3L, 2L, 2L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 2L, 1L, 3L, 1L, 4L, 1L, 2L, 3L, 4L, 3L, 3L, 2L, 3L, 3L, 1L, 5L, 1L, 4L), x5 = c(3L, 4L, 3L, 3L, 1L, 3L, 4L, 5L, 3L, 3L, 3L, 2L, 2L, 3L, 4L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 3L, 3L, 5L, 2L, 4L, 4L, 2L, 3L, 4L, 3L, 3L, 3L, 5L, 2L, 1L, 1L, 1L, 2L, 4L, 4L, 3L, 2L, 3L, 3L, 5L, 1L, 3L, 5L, 3L, 2L, 4L, 2L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 3L, 3L, 1L, 5L, 1L, 3L, 3L, 5L, 4L, 5L, 1L, 5L, 3L, 3L, 1L, 3L, 5L, 5L, 1L, 4L, 5L, 3L, 4L, 1L, 4L, 5L, 4L, 3L, 3L, 5L, 2L, 3L, 4L, 3L, 3L, 2L, 5L, 5L, 3L, 3L, 4L, 1L, 2L, 3L, 4L, 5L, 1L, 2L, 1L, 1L, 2L, 1L, 1L, 1L, 3L, 2L, 5L, 4L, 1L, 3L, 1L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 4L, 3L, 5L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 3L, 3L, 2L, 3L, 1L, 5L, 4L, 5L, 2L, 5L, 5L, 3L, 1L, 1L, 3L, 5L, 4L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 2L, 3L, 3L, 3L, 3L, 2L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 4L, 2L, 2L, 1L, 3L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 5L, 3L, 3L, 4L, 5L, 5L, 2L, 3L, 4L, 1L, 1L, 1L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 2L, 2L, 2L, 3L, 5L, 3L, 5L, 3L, 2L, 3L, 5L, 1L, 4L, 3L, 4L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 2L, 3L, 1L, 2L, 2L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 3L, 3L, 1L, 1L, 3L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 4L, 1L, 4L), x6 = c(3L, 5L, 3L, 3L, 3L, 3L, 4L, 5L, 1L, 3L, 3L, 1L, 1L, 2L, 3L, 2L, 2L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 4L, 3L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 1L, 5L, 4L, 5L, 1L, 4L, 5L, 5L, 1L, 3L, 3L, 3L, 5L, 3L, 4L, 3L, 2L, 3L, 1L, 3L, 3L, 3L, 3L, 5L, 1L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 2L, 4L, 1L, 3L, 5L, 5L, 2L, 3L, 5L, 3L, 1L, 3L, 4L, 5L, 5L, 3L, 1L, 3L, 1L, 3L, 5L, 3L, 3L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 1L, 4L, 5L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 1L, 3L, 1L, 5L, 5L, 1L, 4L, 3L, 4L, 4L, 2L, 5L, 3L, 3L, 5L, 2L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 5L, 5L, 3L, 5L, 1L, 4L, 3L, 3L, 3L, 2L, 4L, 1L, 3L, 3L, 2L, 3L, 3L, 5L, 4L, 5L, 2L, 3L, 5L, 3L, 1L, 1L, 3L, 5L, 3L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 3L, 2L, 2L, 3L, 3L, 1L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 2L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 4L, 1L, 3L, 4L, 5L, 5L, 3L, 3L, 1L, 3L, 1L, 2L, 1L, 5L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 5L, 3L, 5L, 3L, 5L, 4L, 5L, 5L, 1L, 2L, 4L, 1L, 1L, 1L, 4L, 5L, 3L, 3L, 4L, 2L, 5L, 2L, 3L, 2L, 3L, 5L, 3L, 5L, 5L, 3L, 3L, 4L, 1L, 3L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 3L, 3L, 2L, 3L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 1L, 1L, 5L, 1L, 5L, 1L, 1L, 3L, 3L, 3L, 4L, 2L, 2L, 3L, 3L, 5L, 1L, 5L)), sample_cov = NULL, sample_nobs = NULL, rotation = "varimax", rotation.args = list(), bounds = "pos.var", cmd = "efa", estimator = "WLSMV", ordered = c("x1", "x2", "x3", "x4", "x5", "x6"), missing = "available.cases", slot.sample.stats = new("lavSampleStats", var = list(c(1, 1, 1, 1, 1, 1)), cov = list(c(1, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, > test-esem.R: -0.0528665611502654, 0.847708645568633, 1, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, 0.852266877770598, 0.866098037290729, 1, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, -0.045025067439856, -0.00562422746118933, -0.0468064624916715, 1, 0.854835831983838, 0.8624962089988, 0.0187792727635132, 0.0637607092511551, 0.0271693531291436, 0.854835831983838, 1, 0.864362516433594, -0.0528665611502654, 0.00299593013986168, -0.0307059937186903, 0.8624962089988, 0.864362516433594, 1)), mean = list( c(0, 0, 0, 0, 0, 0)), th = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951)), th.idx = list( c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 6L, 6L, 6L, 6L)), th.names = list(c("x1|t1", "x1|t2", "x1|t3", "x1|t4", "x2|t1", "x2|t2", "x2|t3", "x2|t4", "x3|t1", "x3|t2", "x3|t3", "x3|t4", "x4|t1", "x4|t2", "x4|t3", "x4|t4", "x5|t1", "x5|t2", "x5|t3", "x5|t4", "x6|t1", "x6|t2", "x6|t3", "x6|t4")), res.cov = list(NULL), res.var = list( NULL), res.th = list(NULL), res.th.nox = list(NULL), res.slopes = list(NULL), res.int = list(NULL), mean.x = list( NULL), cov.x = list(NULL), bifreq = list(NULL), group.w = list( 1), nobs = list(300L), ntotal = 300L, ngroups = 1L, x.idx = list(integer(0)), icov = list(NULL), cov.log.det = list( NULL), res.icov = list(NULL), res.cov.log.det = list( NULL), ridge = 0, WLS.obs = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, -0.0528665611502654, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, 0.854835831983838, 0.8624962089988, 0.864362516433594)), WLS.V = list(NULL), WLS.VD = list(c(0.45383482142755, 0.587709518619898, 0.591395244765584, 0.435865310988534, 0.458128368522494, 0.593178170698077, 0.575667399853721, 0.486139871182117, 0.470559146996906, 0.589572474383863, 0.587709518619898, 0.440480678601174, 0.435865310988534, 0.601506349600645, 0.583861633032411, 0.449463546185201, 0.489866730490175, 0.598291135869332, 0.569072720318582, 0.466488951106186, 0.500662923226088, 0.589572474383863, 0.579848639230085, 0.514201673558285, 7.44280585633078, 6.75326246420858, 0.68465337775283, 0.747098037875909, 0.711965105740159, 11.6264723451673, 0.71957812751013, 0.780476688725976, 0.738014115692331, 0.688027249018883, 0.764993477317059, 0.751303879951114, 8.27390801013265, 8.47099984869401, 10.1221593413523)), NACOV = list(c(2.20344484994446, 1.2774226485315, 0.608464081144384, 0.438580200934569, 1.24211958837833, 1.06100103747073, 0.579645270096896, 0.476730975188745, 1.17367332415033, 1.00896404529906, 0.601140069897175, 0.44176715543208, -0.219015644772081, -0.0242678714026954, -0.0379083822845332, 0.079081810080948, -0.0564610061408481, -0.120072924149705, 0.107363949033218, 0.109435686051998, -0.169568169571692, -0.238028958705595, -0.0135053916825915, -0.0269051436957956, 0.148317263761989, 0.15574465153135, -0.0301086318650708, 0.00933114409349929, -0.0308508864967571, 0.110777263526235, 0.00948677799058494, -0.00412089339286978, -0.10125465414037, 0.0785862105655183, 0.0555335781266458, -0.0638553156597295, -0.0280957630388753, -0.00123067312283201, -0.0342607132374605, 1.2774226485315, 1.70152085055262, 0.810471242285935, 0.584186727382364, 1.14089096616285, 1.11498605030749, 0.74527622661719, 0.635003375993402, 1.06755750714773, 1.03707982565867, 0.748585766358322, 0.588431735511437, -0.195764701197282, -0.057578351381687, -0.0504937836682346, -0.0373067097809645, 0.0599296137472571, -0.0417199784040522, 0.0501041505326083, 0.0809914034723241, -0.102201933410529, -0.130802860893886, -0.0148660064484897, 0.0449437782925636, 0.0741651928462058, 0.0490907248507851, -0.0176892046762685, 0.00394541784101921, -0.00847157050708947, 0.0757812257161068, -0.0661029519937833, -0.0252830371146104, -0.0476247917553443, -0.0264569477560322, 0.0323015886413371, -0.0169096775619646, -0.00652515275734159, -0.0245753162929485, -0.0110359863231057, 0.608464081144384, 0.810471242285935, 1.69091653822204, 1.21881067112823, 0.576674081941792, 0.774285253955362, 1.0792024722852, 1.05804201981214, 0.625589760454923, 0.815394330786237, 1.12783689455862, 1.15169768636051, 0.0136079556709071, 0.0243719568965317, -0.0184270459355523, -0.0493207998636407, 0.0858315089017964, 0.0837418857774159, -0.0113399097133595, 0.0479013123640107, 0.0827363125250564, -0.0337960621007554, -0.0540468233753761, 0.0344537680314544, -0.0835035702275452, -0.0786770150818312, 0.0106760261359684, -0.00123494659659294, 0.0122565252286696, -0.0592467719700587, -0.0412145589031354, -0.0176224865986117, -0.0380983101009663, -0.0402960408343714, -0.0522514103795643, -0.0445701055393561, 0.0398832411621319, 0.005478944302505, 0.0388495658350893, 0.438580200934569, 0.584186727382364, 1.21881067112823, 2.29428673213755, 0.441666799275109, 0.594893883378979, 1.19451162375741, 1.29095297173797, 0.450924370633182, 0.587735283838845, 1.16371239045051, 1.39753600268651, 0.0789137392518928, 0.0110390707298294, -0.146050804979038, -0.157518417294168, 0.0198461232749442, -0.0386675911959832, -0.106723079606281, 0.0285854186705204, -0.00626559185412115, -0.0310691387157628, -0.135030448940603, -0.116121963366209, -0.159334208125366, -0.139085742363334, 0.0271974707303992, -0.0071037068500013, 0.0263069574461733, -0.128992483494249, 0.107707346627344, 0.0946179973328222, 0.127452670358713, 0.110027033838194, 0.0789431409081486, 0.0904561706745593, 0.00997923231952932, -0.00851490425935088, 0.020452480807499, 1.24211958837833, 1.14089096616285, 0.576674081941792, 0.441666799275109, 2.18279431859916, 1.25161307106614, 0.58372464286605, 0.480086067447278, 1.29726260924579, 0.984812668193073, 0.605370716739469, 0.444876182620165, -0.170594704793659, -0.000939948520669462, -0.099353327882025, -0.121499556217292, 0.120824019421084, 0.0113621668615782, -0.0729739856394577, -0.0317318220007143, -0.0866730771247237, -0.174358692112653, -0.0760810863132528, -0.0604073968525699, 0.16194297708138, 0.120827352177701, -0.0919049501204477, -0.0267557831346448, -0.0881523522151011, 0.128137179839506, 0.000212298869746207, 0.0367164551098905, -0.00373340788228093, -0.000447770974788038, 0.0150078675242675, -0.0585860797001331, -0.0031712854387501, -0.0178213100814595, -0.00791788041762326, 1.06100103747073, 1.11498605030749, 0.774285253955362, 0.594893883378979, 1.25161307106614, 1.68583412100813, 0.786235732883992, 0.64664191532757, 1.13913953707982, 1.17862045059145, 0.81539146061268, 0.599216695337057, -0.134627822737602, -0.0578543768292243, -0.0254499315393859, -0.0184196260647881, 0.0394524588887727, -0.0165793698112683, 0.0190914135644343, 0.169073277814853, -0.057167462611575, -0.154022807307125, 0.0880784013810653, 0.0342100668274375, 0.0539361700938887, 0.0615567447500341, -0.0681981562446394, -0.0246495398767953, -0.0554549756281441, 0.0717566895580845, 5.75617068663093e-06, 0.0204479578807549, 7.74832431628764e-05, 0.00318648418314011, 0.0406344952019763, 0.00971501942601362, -0.00345081806988481, -0.0155256161093073, 0.0078896468194146, 0.579645270096895, 0.74527622661719, 1.0792024722852, 1.19451162375741, 0.58372464286605, 0.786235732883992, 1.73711417435502, 1.42869471567676, 0.595959822290149, 0.670001492928105, 1.18493558332661, 1.16630442958261, 0.163795908274427, 0.109091022310938, -0.00540981015134475, -1.57046074786481e-16, 0.102731959227697, 0.146522255839915, 0.0252065688162364, 0.138836295431548, 0.0964684652932333, 0.0827491883696062, 0.120136315645039, -0.00321012859252077, -0.0858800421247186, -0.0451906419084792, -0.0765124055981449, -0.0495654183174262, -0.0848028980005815, -0.0833098166158672, -0.000535439721952539, -0.0120376783586505, 0.00713013186502567, 0.00519137622969441, 0.0317853983114957, 0.0120483492539913, 0.0335091835712613, -0.0158877338895445, 0.0458021905858184, 0.476730975188745, 0.635003375993402, 1.05804201981214, 1.29095297173797, 0.480086067447278, 0.64664191532757, 1.42869471567676, 2.05702115641813, 0.490148927129519, 0.571882388380539, 1.21484756042805, 1.46125569212401, 0.212680617707058, > test-esem.R: 0.145119741737691, -0.0165152518961889, -0.0882562149935091, 0.206218263545022, 0.166099245009795, -0.00386514223473117, 0.0174182527862748, 0.0997440147141751, 0.103034832027179, 0.0653127512676339, -0.0071150608221477, -0.134071027660114, -0.0976632797843361, -0.137740647801462, -0.129333918235308, -0.117770415220244, -0.155270199765802, 0.00279700652525927, -0.029357693070375, 0.00385735432182198, -0.0242062457633788, -0.0532930035886563, -0.00857750561667388, 0.0767430961264705, -0.00352146452370503, 0.0679798285981358, 1.17367332415033, 1.06755750714773, 0.625589760454923, 0.450924370633182, 1.29726260924579, 1.13913953707982, 0.595959822290149, 0.49014892712952, 2.1251313599618, 1.30132191861677, 0.618059609401317, 0.454201024362567, -0.241597776915651, -0.0362922311272902, -0.098028891044111, -0.142411540832355, 0.0448569291718996, -0.0239915790387723, -0.0385217266559336, 0.0430732015144227, -0.111115021635821, -0.132288435076582, -0.0047687613849894, -0.0301359480319713, 0.138783846835874, 0.13451304238041, -0.0723053721025387, 0.0235559639025693, -0.0229809041838941, 0.14579926213725, -0.0346675510650626, 0.0278921595163239, -0.0029584179876469, -0.0143270955539256, 0.0186565372953722, -0.0162965216843151, -0.00917673037167745, 0.00379043849646447, 0.00436030761914487, 1.00896404529906, 1.03707982565867, 0.815394330786237, 0.587735283838845, 0.984812668193073, 1.17862045059145, 0.670001492928105, 0.571882388380539, 1.30132191861677, 1.69614431380138, 0.805579524235362, 0.592006077646191, -0.0849566905132264, 0.0345326507924104, -0.042071892364949, -0.0309553186878741, 0.119344126776945, 0.0764956513097508, -0.0235887381762751, 0.0516400329150373, 0.0202881363683058, -0.0352304618528652, -0.0595609077281687, 0.0516911215418863, 0.0687933674969333, 0.0369020237224323, 0.00995076809763176, 0.064092949342599, 0.0369408306412495, 0.0799479942345352, 0.005592058134837, 0.0487302938257757, 0.0493669036835191, -0.0138630042221855, 0.00884439739842633, -0.00367260312735112, 0.0351601326522669, 0.00839475638588036, 0.0119231550404147, 0.601140069897175, 0.748585766358322, 1.12783689455862, 1.16371239045051, 0.605370716739469, 0.81539146061268, 1.18493558332661, 1.21484756042805, 0.618059609401317, 0.805579524235362, 1.70152085055262, 1.2504174379618, 0.118080295960265, 0.0828320142683918, -0.133598135955537, -0.186533548904822, 0.0732473056910928, 0.0671589896260352, -0.104565183720226, 0.0255762326754712, 0.0375171654291813, -0.0508677792365115, -0.0647733138112737, -0.0137328211449501, -0.0724591490523034, -0.0791267384446038, 0.00181309216736721, -0.0214221821010069, -0.0300017587548346, -0.0877579746528331, 0.10479954023783, 0.0704790601404688, 0.0725730814762955, 0.0132397293060142, 0.00392597583562099, 0.00574676565142401, 0.0545645893278382, 0.00351526032811938, 0.0482644269885699, 0.44176715543208, 0.588431735511437, 1.15169768636051, 1.39753600268651, 0.444876182620165, 0.599216695337057, 1.16630442958261, 1.46125569212401, 0.454201024362567, 0.592006077646191, 1.2504174379618, 2.27024713813936, 0.200952889275185, -0.0133620970402425, -0.0788523417871815, -0.219328304783088, 0.176164832903571, 0.0493539480970899, -0.116865540995329, 0.0187955189173209, 0.00380285492607957, -0.0183094663189546, -0.0671092644366832, -0.0330283840404653, -0.139306280370751, -0.13875441713431, 0.0668223880050227, -0.0448927653441914, 0.0318365551567394, -0.151806904210309, 0.148960920619109, 0.0609038763998929, 0.134305485249476, 0.031169280380637, -0.0100546599966053, 0.0170376579092655, 0.0337745421542386, -0.000211240075709474, 0.0322855829479996, -0.219015644772081, -0.195764701197282, 0.0136079556709071, 0.0789137392518928, -0.170594704793659, -0.134627822737602, 0.163795908274427, 0.212680617707058, -0.241597776915651, -0.0849566905132264, 0.118080295960265, 0.200952889275185, 2.29428673213755, 1.15558999503623, 0.577148887654197, 0.435492094872112, 1.27015188959644, 1.06222147579554, 0.553093374537492, 0.447838225838153, 1.35577768351094, 1.11397687818633, 0.570187169159342, 0.488208361335366, -0.0452073659278695, -0.0368039242195606, -0.0249465575779013, -0.157562953805574, -0.0510773841561005, -0.0144087480818, -0.000875250301410177, -0.102613201353469, 0.000573271171747722, -0.0360467188781403, -0.106138266021219, -0.00157974786814207, 0.155628564410312, 0.153818992474422, 0.166944494374591, -0.0242678714026954, -0.057578351381687, 0.0243719568965317, 0.0110390707298294, -0.000939948520669464, -0.0578543768292243, 0.109091022310938, 0.145119741737691, -0.0362922311272901, 0.0345326507924104, 0.0828320142683918, -0.0133620970402424, 1.15558999503623, 1.66249284095492, 0.830316892679672, 0.626521943879109, 0.974188874780071, 1.1002507213572, 0.742943487462754, 0.64428374039232, 1.10176290111632, 1.11577341589458, 0.743140939070639, 0.702362350920955, -0.0228496292950282, -0.00169230710749049, -0.0100558231103412, -0.00378787104048013, -0.0243505783648102, 0.0045802720538116, 0.0072931844882099, 0.0359904807552618, -0.0170014618557995, -0.0151073514301341, 0.0160490751802889, 0.00744705291894205, 0.0506965702279097, 0.0646531323927172, 0.0136332585073733, -0.0379083822845332, -0.0504937836682345, -0.0184270459355523, -0.146050804979038, -0.099353327882025, -0.0254499315393859, -0.00540981015134475, -0.0165152518961889, -0.098028891044111, -0.042071892364949, -0.133598135955537, -0.0788523417871815, 0.577148887654197, 0.830316892679671, 1.71273456487676, 1.29235692829569, 0.631548022402756, 0.768991594381702, 1.17427537880214, 1.1139472986559, 0.644167387922915, 0.76968868646083, 1.18316692085857, 1.25985049764384, -0.0497100849928933, 0.0114243324019316, 0.0145262770963222, 0.0972680602138176, 0.0637726699623928, 0.012559878300944, -0.00486631793652915, 0.0635513532398554, 0.0254927803908756, 0.00644936625016048, 0.0984423108227788, 0.0677157657287604, -0.0765907638253904, -0.07315026181056, -0.0918071222196781, 0.0790818100809479, -0.0373067097809646, -0.0493207998636407, -0.157518417294168, -0.121499556217292, -0.0184196260647881, -1.83037594978595e-16, -0.0882562149935091, -0.142411540832355, -0.0309553186878741, -0.186533548904822, -0.219328304783088, 0.435492094872112, 0.626521943879109, 1.29235692829569, 2.22487453874168, 0.476539376877921, 0.618983350337493, 1.14976137667066, 1.42361294424794, 0.486061415374205, 0.600533182544757, 1.05121838213894, 1.15403067874422, -0.0158659044150101, 0.0563346056670746, 0.0236919740312106, 0.103285956119985, -0.000130894536512416, 0.0205212058726693, -0.007320814773629, 0.0875644703300589, -0.00850467831901114, 0.0127667492155082, 0.17068413621789, 0.0662442892600502, -0.152316211916453, -0.145043021521224, -0.119582194867943, -0.056461006140848, 0.0599296137472572, 0.0858315089017964, 0.0198461232749443, 0.120824019421084, 0.0394524588887727, 0.102731959227697, 0.206218263545022, 0.0448569291718996, 0.119344126776945, 0.0732473056910928, 0.176164832903571, 1.27015188959644, 0.974188874780071, 0.631548022402756, 0.476539376877921, 2.04137153588563, 1.28678875419635, 0.605225158300069, 0.490049191698183, 1.2559069292527, 1.04757622393096, 0.623930127537152, 0.534224411962442, -0.00822479371015104, 0.00663271019471845, 0.019465008972702, 0.00885836454286383, 0.0422893759118978, 0.00923383989163264, 0.0428107979498749, 0.0357418739580545, 0.142453716502339, 0.0307344604466001, 0.0109412500742362, 0.0843708232885414, 0.134776830038491, 0.118952680023042, 0.141748124176178, -0.120072924149705, -0.0417199784040522, 0.0837418857774159, -0.0386675911959832, 0.0113621668615782, -0.0165793698112683, 0.146522255839915, 0.166099245009794, -0.0239915790387723, 0.0764956513097508, 0.0671589896260352, 0.0493539480970899, 1.06222147579554, 1.1002507213572, 0.768991594381703, 0.618983350337493, 1.28678875419635, 1.67142706961048, 0.786135027597283, 0.636531428934211, 1.09154115621558, 1.11501277174014, 0.758613312330241, 0.693911211524711, -0.00264628084991393, -0.020670859392103, 0.0206585540721674, 0.0076120270915056, 0.01977840827582, 0.00887062962888688, 0.0857746926208271, 0.0129649274588139, 0.0930336131142227, 0.0639141756310739, > test-esem.R: 0.00174847079953262, 0.0826773995441732, 0.0577716250034614, 0.0240332716358964, 0.062104419291224, 0.107363949033218, 0.0501041505326083, -0.0113399097133595, -0.106723079606281, -0.0729739856394577, 0.0190914135644343, 0.0252065688162364, -0.00386514223473116, -0.0385217266559336, -0.0235887381762751, -0.104565183720226, -0.116865540995329, 0.553093374537492, 0.742943487462754, 1.17427537880214, 1.14976137667066, 0.605225158300069, 0.786135027597283, 1.75724466187761, 1.42283630209259, 0.549741259193713, 0.708475550052955, 1.22914973668607, 1.25763749578798, -0.0296908946602319, 0.0104200414391291, -0.0145720736487281, 0.0033195334097242, 0.0304989245705094, 0.0248134478800154, 0.019809047212115, -0.0278335902754632, 0.0775381432887526, 0.0170624923090307, -0.00828708360663368, 0.0575131343085677, -0.0862221610584902, -0.0960292154420592, -0.121941490751061, 0.109435686051998, 0.0809914034723241, 0.0479013123640107, 0.0285854186705205, -0.0317318220007143, 0.169073277814853, 0.138836295431548, 0.0174182527862748, 0.0430732015144227, 0.0516400329150374, 0.0255762326754712, 0.0187955189173209, 0.447838225838153, 0.64428374039232, 1.1139472986559, 1.42361294424794, 0.490049191698183, 0.636531428934211, 1.42283630209259, 2.14367349457838, 0.499841178456957, 0.617558201846951, 1.24599523308296, 1.40112741396321, -0.0394721249953512, 0.0370330313771152, -0.0431359339076604, -0.00738449211276925, -0.0854782307059588, 0.0247920992730687, -0.0973040204633906, -0.0424219899345994, -0.10773335775287, -0.0699475831262572, -0.0137548007419955, -0.0746340366111427, -0.14926687959738, -0.122855476743761, -0.153408764961069, -0.169568169571692, -0.102201933410529, 0.0827363125250564, -0.00626559185412116, -0.0866730771247237, -0.057167462611575, 0.0964684652932333, 0.0997440147141751, -0.111115021635821, 0.0202881363683058, 0.0375171654291814, 0.00380285492607959, 1.35577768351094, 1.10176290111632, 0.644167387922915, 0.486061415374205, 1.2559069292527, 1.09154115621558, 0.549741259193713, 0.499841178456957, 1.99735181817812, 1.37283056092203, 0.636397275021004, 0.544899092090007, -0.03708872669238, -0.00935414748115647, -0.00786735696938561, -0.0369559317351903, -0.0235867391754614, 0.00555327458708414, -0.0315362339684262, 0.00408552460269166, -0.000542481453965008, -0.0349182900330659, -0.0522477483772834, -0.0194906592088833, 0.0890398368213926, 0.131204656804499, 0.153319351221939, -0.238028958705595, -0.130802860893886, -0.0337960621007554, -0.0310691387157628, -0.174358692112653, -0.154022807307125, 0.0827491883696063, 0.103034832027179, -0.132288435076582, -0.0352304618528652, -0.0508677792365115, -0.0183094663189545, 1.11397687818633, 1.11577341589458, 0.76968868646083, 0.600533182544757, 1.04757622393096, 1.11501277174014, 0.708475550052955, 0.617558201846951, 1.37283056092203, 1.69614431380138, 0.786274468293161, 0.673227653107653, -0.0249870847892577, -0.0310623448791116, -0.0597662654253912, -0.0500516446493022, -0.0205554406398311, 0.00347675808841012, -0.0686655886007817, 0.00959998906957744, -0.00634275627248089, -0.0513443431595157, -0.00110780602245252, -0.0123907039927979, 0.0395883128666614, 0.0716961735842288, 0.0545351763997118, -0.0135053916825915, -0.0148660064484897, -0.0540468233753762, -0.135030448940603, -0.0760810863132528, 0.0880784013810652, 0.120136315645039, 0.0653127512676339, -0.00476876138498948, -0.0595609077281687, -0.0647733138112737, -0.0671092644366832, 0.570187169159342, 0.743140939070639, 1.18316692085857, 1.05121838213894, 0.623930127537152, 0.758613312330241, 1.22914973668607, 1.24599523308296, 0.636397275021004, 0.786274468293161, 1.72458799132095, 1.47663490650412, -0.0171591736580541, 0.0168446332834493, 0.0156862359188135, 0.033364333452295, 0.017604243021788, 0.0417778807218433, -0.0266860377378277, -0.00837804674737573, -0.00682932784787414, -0.0185360321639612, 0.00923449433845097, 0.0103019254283266, -0.0913713589057094, -0.0780111274536073, -0.103938786698107, -0.0269051436957957, 0.0449437782925636, 0.0344537680314544, -0.116121963366209, -0.0604073968525698, 0.0342100668274374, -0.00321012859252068, -0.0071150608221477, -0.0301359480319713, 0.0516911215418863, -0.0137328211449501, -0.0330283840404653, 0.488208361335366, 0.702362350920954, 1.25985049764384, 1.15403067874422, 0.534224411962442, 0.693911211524711, 1.25763749578798, 1.40112741396321, 0.544899092090007, 0.673227653107653, 1.47663490650412, 1.94476224295417, -0.0600572970215252, -0.0129462981571512, -0.0383334777746061, 0.0618573160951042, 0.0275218234991843, 0.0130731844584642, -0.0693311489782209, 0.0476073305366232, -0.00861177497025037, -0.104231047599455, -0.00601795258733618, 0.00995636294223921, -0.110540740333587, -0.122682130683992, -0.132968263756207, 0.148317263761989, 0.0741651928462058, -0.0835035702275452, -0.159334208125366, 0.161942977081381, 0.0539361700938887, -0.0858800421247186, -0.134071027660114, 0.138783846835874, 0.0687933674969333, -0.0724591490523034, -0.139306280370751, -0.0452073659278695, -0.0228496292950282, -0.0497100849928933, -0.0158659044150101, -0.00822479371015103, -0.00264628084991393, -0.0296908946602319, -0.0394721249953512, -0.03708872669238, -0.0249870847892577, -0.0171591736580541, -0.0600572970215252, 0.13435793157891, 0.0648999991313963, 0.0163257727891063, 0.0222001474813885, 0.00586415479170394, 0.0553201434932848, -0.00774333873252011, -0.00406552748573637, -0.00893407703646892, 0.00190480732538636, 0.00711445555663318, -0.00993507647126291, -0.00346764772535688, -0.00584038224322596, -0.0043281721243053, 0.15574465153135, 0.0490907248507852, -0.0786770150818312, -0.139085742363334, 0.120827352177701, 0.0615567447500341, -0.0451906419084792, -0.0976632797843361, 0.13451304238041, 0.0369020237224324, -0.0791267384446038, -0.13875441713431, -0.0368039242195606, -0.00169230710749049, 0.0114243324019316, 0.0563346056670746, 0.00663271019471846, -0.020670859392103, 0.0104200414391291, 0.0370330313771152, -0.00935414748115647, -0.0310623448791116, 0.0168446332834493, -0.0129462981571512, 0.0648999991313963, 0.148076578586997, 0.0102311998810714, 0.0360677109152718, 0.0157559499489283, 0.0471580164973155, -0.024660772824432, 0.00213812557707964, -0.0216906952994601, -0.0148339752411867, 0.018408323287891, -0.0189706498549756, -0.0118850547463466, -0.00878063137456458, -0.00695610027104775, -0.0301086318650708, -0.0176892046762685, 0.0106760261359684, 0.0271974707303992, -0.0919049501204477, -0.0681981562446394, -0.0765124055981449, -0.137740647801462, -0.0723053721025387, 0.00995076809763175, 0.00181309216736721, 0.0668223880050227, -0.0249465575779013, -0.0100558231103412, 0.0145262770963222, 0.0236919740312106, 0.0194650089727021, 0.0206585540721674, -0.0145720736487281, -0.0431359339076604, -0.00786735696938561, -0.0597662654253913, 0.0156862359188135, -0.0383334777746061, 0.0163257727891063, 0.0102311998810714, 1.46059310082162, 1.05092773064802, 1.14570089017992, -0.000204120425811351, 1.0924386835732, 0.800404470692711, 0.866078362448077, 1.06893041162047, 0.767172388010609, 0.812608776357063, 5.64931156303635e-06, 0.0102626772585488, 0.00490334272631464, 0.00933114409349929, 0.00394541784101922, -0.00123494659659295, -0.0071037068500013, -0.0267557831346448, -0.0246495398767953, -0.0495654183174262, -0.129333918235308, 0.0235559639025693, 0.064092949342599, -0.0214221821010069, -0.0448927653441914, -0.157562953805574, -0.00378787104048014, 0.0972680602138176, 0.103285956119985, 0.00885836454286384, 0.00761202709150559, 0.00331953340972421, -0.00738449211276925, -0.0369559317351903, -0.0500516446493022, 0.033364333452295, 0.0618573160951042, 0.0222001474813885, 0.0360677109152718, 1.05092773064801, 1.33851241644687, 1.0552643434031, 0.0164763439450202, 0.793710751295646, 1.05114166617281, 0.785239966039694, 0.790106915227831, 1.02177932037355, 0.772375497705721, -0.0457924736654755, -0.0294483813254788, -0.0249420219318624, -0.0308508864967572, -0.00847157050708947, 0.0122565252286696, 0.0263069574461733, -0.0881523522151011, -0.0554549756281442, -0.0848028980005815, -0.117770415220244, -0.0229809041838941, 0.0369408306412495, -0.0300017587548346, 0.0318365551567393, -0.0510773841561005, -0.0243505783648102, 0.0637726699623928, -0.000130894536512413, 0.0422893759118978, 0.01977840827582, 0.0304989245705094, -0.0854782307059588, -0.0235867391754614, -0.0205554406398311, 0.017604243021788, 0.0275218234991843, 0.00586415479170394, 0.0157559499489283, 1.14570089017992, 1.0552643434031, 1.40456321796895, 0.002375688741747, 0.854793847130113, 0.798909003312101, 1.08161905449057, 0.881489941991868, 0.812215657741097, 1.0699033568652, -0.0256936941471223, -0.0192954594118436, 0.00388272127596111, 0.110777263526235, 0.0757812257161068, -0.0592467719700587, -0.128992483494249, 0.128137179839506, 0.0717566895580845, -0.0833098166158672, -0.155270199765802, 0.14579926213725, 0.0799479942345352, -0.0877579746528331, -0.151806904210309, -0.0144087480818, 0.0045802720538116, 0.012559878300944, 0.0205212058726693, 0.00923383989163264, 0.00887062962888688, 0.0248134478800154, 0.0247920992730687, 0.00555327458708413, 0.00347675808841012, 0.0417778807218433, 0.0130731844584642, 0.0553201434932848, 0.0471580164973155, -0.000204120425811351, 0.0164763439450202, 0.002375688741747, 0.0860106118444142, -0.019900141742653, -0.00853341765654292, -0.0214039745610184, 0.00329365658923978, 0.018798081814193, 0.00581948595103035, -0.00488309654925988, 0.00560377528198599, -0.0120229152759623, 0.00948677799058492, -0.0661029519937833, -0.0412145589031353, 0.107707346627344, 0.000212298869746286, 5.75617068664727e-06, -0.000535439721952491, 0.00279700652525929, -0.0346675510650626, 0.005592058134837, 0.10479954023783, 0.148960920619109, -0.000875250301410178, 0.0072931844882099, -0.00486631793652915, -0.00732081477362901, 0.0428107979498749, 0.0857746926208272, 0.019809047212115, -0.0973040204633905, -0.0315362339684262, -0.0686655886007816, > test-esem.R: -0.0266860377378277, -0.0693311489782208, -0.00774333873252011, -0.024660772824432, 1.0924386835732, 0.793710751295646, 0.854793847130113, -0.019900141742653, 1.38970316324119, 0.981893200602164, 1.08597201729475, 1.11220858116664, 0.765698559147951, 0.82894666600568, 0.0142986764803992, 0.010614318885733, 0.0160737255995745, -0.0041208933928698, -0.0252830371146104, -0.0176224865986117, 0.0946179973328222, 0.0367164551098905, 0.0204479578807549, -0.0120376783586505, -0.029357693070375, 0.0278921595163239, 0.0487302938257758, 0.0704790601404688, 0.0609038763998929, -0.102613201353469, 0.0359904807552618, 0.0635513532398554, 0.0875644703300589, 0.0357418739580544, 0.0129649274588139, -0.0278335902754632, -0.0424219899345994, 0.00408552460269165, 0.00959998906957744, -0.00837804674737573, 0.0476073305366232, -0.00406552748573637, 0.00213812557707964, 0.800404470692711, 1.05114166617281, 0.798909003312101, -0.00853341765654293, 0.981893200602164, 1.28126824855252, 0.953252779725438, 0.79984192501233, 1.00662688239373, 0.729381828929068, -0.0329019063108192, -0.0136956271030428, -0.0107407756452412, -0.10125465414037, -0.0476247917553443, -0.0380983101009663, 0.127452670358713, -0.00373340788228093, 7.74832431628925e-05, 0.00713013186502569, 0.00385735432182198, -0.00295841798764691, 0.0493669036835192, 0.0725730814762955, 0.134305485249476, 0.000573271171747709, -0.0170014618557995, 0.0254927803908756, -0.00850467831901116, 0.142453716502339, 0.0930336131142227, 0.0775381432887526, -0.10773335775287, -0.000542481453965015, -0.0063427562724809, -0.00682932784787413, -0.00861177497025037, -0.00893407703646892, -0.0216906952994601, 0.866078362448077, 0.785239966039694, 1.08161905449057, -0.0214039745610184, 1.08597201729475, 0.953252779725438, 1.35498763334885, 0.910480398190892, 0.75340726253597, 1.0564303582682, 0.00579222433398088, -0.00895211036399707, 0.0266774382853429, 0.0785862105655182, -0.0264569477560322, -0.0402960408343714, 0.110027033838194, -0.000447770974788044, 0.00318648418314012, 0.00519137622969441, -0.0242062457633788, -0.0143270955539256, -0.0138630042221855, 0.0132397293060142, 0.031169280380637, -0.0360467188781403, -0.0151073514301341, 0.0064493662501605, 0.0127667492155082, 0.0307344604466001, 0.0639141756310739, 0.0170624923090307, -0.0699475831262572, -0.0349182900330659, -0.0513443431595157, -0.0185360321639612, -0.104231047599455, 0.00190480732538636, -0.0148339752411867, 1.06893041162047, 0.790106915227831, 0.881489941991868, 0.00329365658923978, 1.11220858116664, 0.79984192501233, 0.910480398190892, 1.45343080732047, 1.05062470048119, 1.10783285444028, 0.00482548296748707, 0.0192021029400786, 0.0155516790039065, 0.0555335781266458, 0.0323015886413371, -0.0522514103795643, 0.0789431409081487, 0.0150078675242675, 0.0406344952019763, 0.0317853983114957, -0.0532930035886563, 0.0186565372953721, 0.00884439739842633, 0.00392597583562098, -0.0100546599966053, -0.106138266021218, 0.0160490751802889, 0.0984423108227788, 0.17068413621789, 0.0109412500742362, 0.00174847079953263, -0.00828708360663369, -0.0137548007419955, -0.0522477483772834, -0.00110780602245253, 0.00923449433845097, -0.00601795258733618, 0.00711445555663318, 0.018408323287891, 0.76717238801061, 1.02177932037355, 0.812215657741097, 0.018798081814193, 0.765698559147951, 1.00662688239373, 0.75340726253597, 1.05062470048119, 1.30720068817729, 1.01913616621123, -0.0536652115645841, -0.019213861470815, -0.0172908302087426, -0.0638553156597295, -0.0169096775619646, -0.0445701055393561, 0.0904561706745593, -0.0585860797001331, 0.00971501942601363, 0.0120483492539913, -0.00857750561667388, -0.0162965216843151, -0.00367260312735112, 0.00574676565142401, 0.0170376579092655, -0.00157974786814208, 0.00744705291894205, 0.0677157657287604, 0.0662442892600502, 0.0843708232885414, 0.0826773995441732, 0.0575131343085677, -0.0746340366111427, -0.0194906592088833, -0.0123907039927979, 0.0103019254283266, 0.00995636294223919, -0.00993507647126291, -0.0189706498549756, 0.812608776357063, 0.772375497705721, 1.0699033568652, 0.00581948595103035, 0.82894666600568, 0.729381828929068, 1.0564303582682, 1.10783285444028, 1.01913616621123, 1.33101934741115, -0.0160332825788463, -0.0194673047264479, 0.0076134333416248, -0.0280957630388753, -0.00652515275734159, 0.0398832411621319, 0.00997923231952932, -0.00317128543875011, -0.00345081806988481, 0.0335091835712613, 0.0767430961264705, -0.00917673037167745, 0.0351601326522669, 0.0545645893278382, 0.0337745421542386, 0.155628564410312, 0.0506965702279097, -0.0765907638253904, -0.152316211916453, 0.134776830038491, 0.0577716250034614, -0.0862221610584902, -0.14926687959738, 0.0890398368213926, 0.0395883128666614, -0.0913713589057094, -0.110540740333588, -0.00346764772535688, -0.0118850547463466, 5.64931156303779e-06, -0.0457924736654755, -0.0256936941471223, -0.00488309654925988, 0.0142986764803992, -0.0329019063108192, 0.00579222433398088, 0.00482548296748707, -0.0536652115645841, -0.0160332825788463, 0.120861870687388, 0.0659352781421284, 0.0637822024211485, -0.00123067312283201, -0.0245753162929485, 0.005478944302505, -0.00851490425935088, -0.0178213100814595, -0.0155256161093073, -0.0158877338895445, -0.00352146452370504, 0.00379043849646447, 0.00839475638588036, 0.00351526032811938, -0.00021124007570947, 0.153818992474422, 0.0646531323927172, -0.07315026181056, -0.145043021521224, 0.118952680023042, 0.0240332716358964, -0.0960292154420592, -0.122855476743761, 0.131204656804499, 0.0716961735842288, -0.0780111274536073, -0.122682130683992, -0.00584038224322596, -0.00878063137456458, 0.0102626772585488, -0.0294483813254788, -0.0192954594118436, 0.00560377528198599, 0.010614318885733, -0.0136956271030428, -0.00895211036399707, 0.0192021029400786, -0.019213861470815, -0.0194673047264479, 0.0659352781421284, 0.118049819131347, 0.0482278273076368, -0.0342607132374605, -0.0110359863231057, 0.0388495658350893, 0.020452480807499, -0.00791788041762326, 0.0078896468194146, 0.0458021905858184, 0.0679798285981358, 0.00436030761914487, 0.0119231550404147, 0.0482644269885699, 0.0322855829479996, 0.166944494374591, 0.0136332585073733, -0.0918071222196781, -0.119582194867943, 0.141748124176178, 0.0621044192912241, -0.121941490751061, -0.153408764961069, 0.153319351221939, 0.0545351763997117, -0.103938786698107, -0.132968263756207, -0.00432817212430529, -0.00695610027104775, 0.00490334272631464, -0.0249420219318624, 0.00388272127596111, -0.0120229152759623, 0.0160737255995745, -0.0107407756452412, 0.0266774382853429, 0.0155516790039065, -0.0172908302087426, 0.0076134333416248, 0.0637822024211485, 0.0482278273076368, 0.0987931493939915)), NACOV.user = FALSE, missing.flag = FALSE, missing = list(NULL), missing.h1 = list( NULL), YLp = list(NULL), zero.cell.tables = list( c("x1", "x1", "x2", "x4", "x4", "x5", "x2", "x3", "x3", "x5", "x6", "x6")))) > test-esem.R: 13: do.call("sem", args = c(list(model = model_syntax, data = data, sample_cov = sample_cov, sample_nobs = sample_nobs, rotation = rotation, rotation.args = rotation_args, bounds = bounds, cmd = "efa"), dotdotdot)) > test-esem.R: 14: (function (data = NULL, nfactors = 1L, sample_cov = NULL, sample_nobs = NULL, rotation = "geomin", rotation_args = list(), ov_names = NULL, > test-esem.R: bounds = "pos.var", ..., output = "efa") { dotdotdot <- list(...) lav_adapt_func(environment(), dotdotdot, TRUE) if (!missing(rotation_args)) { lav_deprecated_args("rotation", "rotation_args") } if (is.list(rotation)) { rotation_args <- modifyList(list(), rotation) rotation_args <- lav_snake_case(rotation_args) rotation <- rotation[[1L]] } twolevel_flag <- !is.null(dotdotdot$cluster) group_flag <- !is.null(dotdotdot$group) sampling_weights_flag <- !is.null(dotdotdot$sampling.weights) if (!is.null(data) && !inherits(data, "lavMoments")) { data <- as.data.frame(data) } if (!is.null(data) && inherits(data, "lavMoments")) { if ("sample.cov" %in% names(data)) { ov_names <- rownames(data$sample.cov) if (is.null(ov_names)) { ov_names <- colnames(data$sample.cov) } } else { lav_msg_stop(gettext("When data= is of class lavMoments, it must contain sample.cov")) } } else if (!is.null(data) && inherits(data, "data.frame")) { if (length(ov_names) > 0L) { names_1 <- ov_names if (twolevel_flag) { names_1 <- c(names_1, dotdotdot$cluster) } if (group_flag) { names_1 <- c(names_1, dotdotdot$group) } if (sampling_weights_flag) { names_1 <- c(names_1, dotdotdot$sampling.weights) } data <- data[, names_1, drop = FALSE] } else { ov_names <- names(data) if (twolevel_flag) { if (!all(dotdotdot$cluster %in% ov_names)) { lav_msg_stop(gettextf("cluster variable(s) %s not found in data.", lav_msg_view(dotdotdot$cluster[!dotdotdot$cluster %in% ov_names]))) } ov_names <- setdiff(ov_names, dotdotdot$cluster) } if (group_flag) { if (!all(dotdotdot$group %in% ov_names)) { lav_msg_stop(gettextf("group variable(s) %s not found in data.", lav_msg_view(dotdotdot$group[!dotdotdot$group %in% ov_names]))) } ov_names <- setdiff(ov_names, dotdotdot$group) } if (sampling_weights_flag) { if (!all(dotdotdot$sampling.weights %in% ov_names)) { lav_msg_stop(gettextf("sampling.weights variable(s) %s not found in data.", lav_msg_view(dotdotdot$sampling.weights[!dotdotdot$sampling.weights %in% ov_names]))) } ov_names <- setdiff(ov_names, dotdotdot$sampling.weights) } } } else if (!is.null(sample_cov)) { ov_names <- rownames(sample_cov) if (is.null(ov_names)) { ov_names <- colnames(sample_cov) } } if (length(ov_names) == 0L) { lav_msg_stop(gettext("could not extract variable names from data or sample_cov")) } nlevels <- if (twolevel_flag) 2L else 1L if (group_flag && !is.null(data) && inherits(data, "data.frame")) { ngroups <- length(unique(data[[dotdotdot$group]])) } else if (!is.null(sample_cov) && is.list(sample_cov) && !inherits(sample_cov, "lavMoments")) { ngroups <- length(sample_cov) } else { ngroups <- 1L } nblocks <- ngroups * nlevels if (is.list(nfactors)) { nfactors_list <- lapply(nfactors, function(x) { x <- as.integer(x) if (length(x) == 1L) { x <- rep.int(x, nblocks) } if (length(x) != nblocks) { lav_msg_stop(gettextf("each element of nfactors must have length 1 or\n the number of blocks (= %1$s); found length %2$s.", nblocks, length(x))) } x }) } else { nfactors_list <- lapply(as.integer(nfactors), function(k) { rep.int(k, nblocks) }) } nfactors_labels <- vapply(nfactors_list, function(x) { if (length(unique(x)) == 1L) { paste0("nf", x[1L]) } else { paste0("nf", paste(x, collapse = "_")) } }, character(1L)) all_nfactors <- unlist(nfactors_list) if (any(all_nfactors < 1L)) { lav_msg_stop(gettext("nfactors must be greater than zero.")) } else { nvar <- length(ov_names) p_star <- nvar * (nvar + 1)/2 nfac_max <- 0L for (nfac in seq_len(nvar)) { npar <- nfac * nvar + nfac * (nfac + 1L)/2 + nvar - nfac^2 if (npar > p_star) { nfac_max <- nfac - 1L break } } if (any(all_nfactors > nfac_max)) { lav_msg_stop(gettextf("when nvar = %1$s the maximum number of factors\n is %2$s", nvar, nfac_max)) } } output <- tolower(output) if (!output %in% c("lavaan", "efa")) { lav_msg_stop(gettext("output= must be either \"lavaan\" or \"efa\"")) } if (output == "lavaan" && length(nfactors_list) > 1L) { lav_msg_stop(gettext("when output = \"lavaan\", nfactors must be a\n single (integer) number.")) } nfits <- length(nfactors_list) out <- vector("list", length = nfits) for (f in seq_len(nfits)) { model_syntax <- lav_syntax_efa(ov_names = ov_names, nfactors = nfactors_list[[f]], nlevels = nlevels, ngroups = ngroups) fit <- do.call("sem", args = c(list(model = model_syntax, data = data, sample_cov = sample_cov, sample_nobs = sample_nobs, rotation = rotation, rotation.args = rotation_args, bounds = bounds, cmd = "efa"), dotdotdot)) if (output == "efa") { fit@Options$model.type <- "efa" } out[[f]] <- fit } if (nfits == 1L && output == "lavaan") { out <- out[[1]] } else { names(out) <- nfactors_labels out$loadings <- lav_efa_get_loadings(out) class(out) <- c("efaList", "list") } out})(data = list(x1 = c(5L, 3L, 4L, 4L, 3L, 4L, 4L, 3L, 5L, 2L, 4L, 5L, 3L, 3L, 3L, 4L, 2L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 4L, 3L, 5L, 1L, 1L, 2L, 1L, 3L, 4L, 2L, 3L, 3L, 1L, 3L, 1L, 5L, 3L, 4L, 4L, 2L, 5L, 4L, 4L, 3L, 3L, 3L, 1L, 4L, 2L, 4L, 4L, 5L, 3L, 5L, 4L, 5L, 3L, 4L, 2L, 3L, 4L, 1L, 3L, 3L, 3L, 4L, 1L, 1L, 5L, 3L, 4L, 3L, 2L, 3L, 3L, 3L, 4L, 4L, 5L, 2L, 4L, 5L, 1L, 1L, 1L, 1L, 3L, 4L, 5L, 5L, 1L, 5L, 1L, 3L, 2L, 2L, 3L, 3L, 3L, 4L, 2L, 2L, 1L, 2L, 3L, 5L, 1L, 3L, 1L, 2L, 3L, 2L, 3L, 3L, 3L, 1L, 1L, 3L, 4L, 3L, 3L, 4L, 5L, 2L, 3L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 1L, 5L, 2L, 2L, 4L, 1L, 2L, 1L, 5L, 3L, 1L, 1L, 3L, 3L, 3L, 5L, 3L, 1L, 3L, 3L, 4L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 1L, 5L, 5L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 1L, 3L, 4L, 2L, 2L, 3L, 3L, 4L, 1L, 2L, 4L, 2L, 3L, 5L, 3L, 1L, 4L, 5L, 5L, 1L, 1L, 2L, 2L, 3L, 3L, 1L, 5L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 2L, 3L, 2L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 3L, 5L, 1L, 3L, 1L, 2L, 5L, 3L, 4L, 1L, 3L, 4L, 4L, 5L, 1L, 5L, 4L, 2L, 5L, 2L, 1L, 3L, 1L, 3L, 5L, 1L, 3L, 3L, 2L, 2L, 4L, 5L, 3L, 1L, 3L, 5L, 5L, 3L, 1L, 4L, 4L, 3L, 3L, 3L, 3L, 4L, 3L, 2L, 5L, 4L, 3L, 2L, 3L, 3L, 3L, 5L, 5L, 2L, 1L, 4L, 2L, 5L, 2L, 5L, 2L, 3L, 3L, 4L, 4L, 2L), x2 = c(5L, 2L, 3L, 3L, 5L, 1L, 5L, 3L, 5L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 3L, 1L, 1L, 5L, 3L, 1L, 2L, 5L, 5L, 3L, 2L, 1L, 3L, 3L, 4L, 5L, 5L, 2L, 4L, 1L, 2L, 3L, 1L, 2L, 3L, 2L, 5L, 2L, 1L, 4L, 1L, 5L, 3L, 4L, 4L, 3L, 5L, 3L, 3L, 3L, 5L, 4L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 5L, 3L, 4L, 5L, 1L, 2L, 4L, 3L, 3L, 4L, 5L, 4L, 2L, 1L, 5L, 3L, 3L, 3L, 1L, 5L, 3L, 5L, 5L, 5L, 5L, 2L, 4L, 5L, 2L, 2L, 1L, 2L, 3L, 3L, 5L, 5L, 2L, 5L, 1L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 2L, 1L, 2L, 1L, 5L, 1L, 3L, 2L, 1L, 4L, 3L, 3L, 3L, 2L, 1L, 1L, 3L, 4L, 3L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 3L, 2L, 1L, 2L, 1L, 3L, 5L, 2L, 2L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 3L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 4L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 3L, 3L, 3L, 3L, 2L, 3L, 3L, 3L, 1L, 4L, 3L, 1L, 1L, 3L, 3L, 3L, 1L, 2L, 5L, 4L, 4L, 5L, 5L, 1L, 3L, 4L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 1L, 5L, 3L, 3L, 4L, 3L, 3L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 3L, 4L, 1L, 3L, 3L, 2L, 5L, 3L, 3L, 2L, 1L, 5L, 5L, 5L, 1L, 5L, 4L, 3L, 5L, 1L, 1L, 3L, 2L, 3L, 5L, 2L, 3L, 3L, 1L, 1L, 5L, 4L, 3L, 1L, 3L, 4L, 3L, 2L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 4L, 2L, 4L, 5L, 5L, 1L, 2L, 3L, 3L, 3L, 5L, 2L, 1L, 2L, 2L, 4L, 3L, 5L, 3L, 3L, 2L, 3L, 3L, 1L), x3 = c(5L, 2L, 3L, 4L, 4L, 3L, 4L, 4L, 5L, 3L, 4L, 5L, 1L, 3L, 3L, 4L, 4L, 1L, 1L, 5L, 3L, 1L, 3L, 5L, 4L, 2L, 3L, 1L, 4L, 3L, 3L, 4L, 5L, 3L, 3L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 4L, 2L, 1L, 4L, 3L, 5L, 2L, 4L, 3L, 2L, 5L, 3L, 3L, 3L, 5L, 2L, 1L, 3L, 3L, 3L, 5L, 5L, 1L, 4L, 3L, 5L, 4L, 5L, 2L, 3L, 3L, 1L, 1L, 4L, 4L, 5L, 2L, 2L, 5L, 3L, 3L, 3L, 1L, 4L, 4L, 2L, 5L, 4L, 5L, 2L, 4L, 5L, 1L, 2L, 1L, 2L, 3L, 4L, 4L, 4L, 2L, 5L, 2L, 3L, 3L, 3L, 3L, 2L, 4L, 3L, 3L, 1L, 1L, 2L, 1L, 5L, 2L, 3L, 1L, 2L, 2L, 2L, 3L, 3L, 2L, 1L, 1L, 4L, 5L, 1L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 3L, 3L, 2L, 1L, 3L, 3L, 4L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 3L, 3L, 1L, 3L, 2L, 2L, 5L, 2L, 3L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 3L, 3L, 4L, 1L, 5L, 4L, 3L, 1L, 4L, 4L, 3L, 4L, 2L, 3L, 4L, 3L, 1L, 3L, 3L, 1L, 1L, 3L, 3L, 4L, 1L, 2L, 4L, 3L, 4L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 1L, 1L, 3L, 2L, 1L, 5L, 3L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 4L, 3L, 2L, 1L, 3L, 3L, 3L, 3L, 1L, 5L, 2L, 4L, 2L, 3L, 3L, 3L, 5L, 3L, 4L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 5L, 3L, 4L, 2L, 1L, 3L, 2L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 3L, 4L, 3L, 1L, 3L, 4L, 5L, 3L, 1L, 3L, 4L, 3L, 3L, 3L, 3L, 5L, 3L, 1L, 5L, 5L, 5L, 1L, 2L, 3L, 3L, 4L, 5L, 1L, 1L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 4L, 3L, 1L), x4 = c(3L, 4L, 3L, 5L, 3L, 3L, 4L, 4L, 2L, 2L, 3L, 3L, 2L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 2L, 5L, 3L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 4L, 2L, 2L, 4L, 5L, 3L, 1L, 1L, 3L, 2L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 1L, 3L, 3L, 5L, 2L, 4L, 1L, 1L, 4L, 3L, 4L, 2L, 1L, 2L, 1L, 3L, 3L, 3L, 3L, 5L, 2L, 3L, 4L, 5L, 3L, 5L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 4L, 5L, 2L, 2L, 2L, 3L, 5L, 4L, 3L, 3L, 3L, 2L, 3L, 4L, 3L, 3L, 4L, 3L, 5L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 5L, 1L, 1L, 3L, 1L, 3L, 2L, 2L, 1L, 3L, 1L, 5L, 4L, 1L, 2L, 2L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 3L, 5L, 1L, 2L, 2L, 5L, 5L, 3L, 5L, 3L, 5L, 3L, 5L, 3L, 2L, 4L, 1L, 2L, 3L, 2L, 3L, 2L, 5L, 4L, 5L, 2L, 5L, 5L, 4L, 1L, 1L, 3L, 5L, 5L, 1L, 2L, 4L, 1L, 4L, 1L, 3L, 2L, 2L, 3L, 3L, 4L, 3L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 3L, 5L, 3L, 3L, 3L, 5L, 3L, 4L, 5L, 2L, 4L, 3L, 5L, 4L, 2L, 4L, 2L, 3L, 3L, 2L, 1L, 4L, 4L, 2L, 2L, 3L, 5L, 5L, 1L, 2L, 4L, 3L, 5L, 3L, 4L, 3L, 5L, 4L, 1L, 2L, 5L, 1L, 1L, 1L, 2L, 3L, 2L, 3L, 2L, 3L, 5L, 1L, 2L, 3L, 3L, 5L, 4L, 4L, 4L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 3L, 3L, 5L, 1L, 5L, 1L, 5L, 3L, 5L, 4L, 2L, 1L, 4L, 3L, 2L, 3L, 2L, 2L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 2L, 1L, 3L, 1L, 4L, 1L, 2L, 3L, 4L, 3L, 3L, 2L, 3L, 3L, 1L, 5L, 1L, 4L), x5 = c(3L, 4L, 3L, 3L, 1L, 3L, 4L, 5L, 3L, 3L, 3L, 2L, 2L, 3L, 4L, 3L, 2L, 3L, 1L, 5L, 3L, 3L, 3L, 3L, 5L, 2L, 4L, 4L, 2L, 3L, 4L, 3L, 3L, 3L, 5L, 2L, 1L, 1L, 1L, 2L, 4L, 4L, 3L, 2L, 3L, 3L, 5L, 1L, 3L, 5L, 3L, 2L, 4L, 2L, 3L, 5L, 2L, 5L, 3L, 1L, 3L, 2L, 3L, 3L, 3L, 1L, 5L, 1L, 3L, 3L, 5L, 4L, 5L, 1L, 5L, 3L, 3L, 1L, 3L, 5L, 5L, 1L, 4L, 5L, 3L, 4L, 1L, 4L, 5L, 4L, 3L, 3L, 5L, 2L, 3L, 4L, 3L, 3L, 2L, 5L, 5L, 3L, 3L, 4L, 1L, 2L, 3L, 4L, 5L, 1L, 2L, 1L, 1L, 2L, 1L, 1L, 1L, 3L, 2L, 5L, 4L, 1L, 3L, 1L, 4L, 3L, 2L, 4L, 3L, 3L, 5L, 2L, 2L, 1L, 2L, 5L, 1L, 3L, 1L, 5L, 4L, 3L, 5L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 1L, 3L, 3L, 2L, 3L, 1L, 5L, 4L, 5L, 2L, 5L, 5L, 3L, 1L, 1L, 3L, 5L, 4L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 2L, 3L, 3L, 3L, 3L, 2L, 1L, 1L, 1L, 4L, 3L, 3L, 1L, 1L, 4L, 3L, 3L, 3L, 5L, 2L, 3L, 5L, 1L, 3L, 3L, 5L, 4L, 2L, 2L, 1L, 3L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 3L, 5L, 5L, 1L, 3L, 5L, 3L, 5L, 3L, 3L, 4L, 5L, 5L, 2L, 3L, 4L, 1L, 1L, 1L, 2L, 5L, 3L, 3L, 2L, 3L, 5L, 2L, 2L, 2L, 3L, 5L, 3L, 5L, 3L, 2L, 3L, 5L, 1L, 4L, 3L, 4L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 2L, 3L, 1L, 2L, 2L, 1L, 3L, 5L, 5L, 4L, 3L, 5L, 3L, 3L, 1L, 1L, 3L, 1L, 3L, 1L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 4L, 1L, 4L), x6 = c(3L, 5L, 3L, 3L, 3L, 3L, 4L, 5L, 1L, > test-esem.R: 3L, 3L, 1L, 1L, 2L, 3L, 2L, 2L, 3L, 1L, 4L, 3L, 3L, 3L, 3L, 5L, 2L, 5L, 3L, 2L, 3L, 3L, 3L, 1L, 3L, 4L, 3L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 1L, 5L, 4L, 5L, 1L, 4L, 5L, 5L, 1L, 3L, 3L, 3L, 5L, 3L, 4L, 3L, 2L, 3L, 1L, 3L, 3L, 3L, 3L, 5L, 1L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 2L, 4L, 1L, 3L, 5L, 5L, 2L, 3L, 5L, 3L, 1L, 3L, 4L, 5L, 5L, 3L, 1L, 3L, 1L, 3L, 5L, 3L, 3L, 2L, 5L, 5L, 2L, 3L, 3L, 3L, 1L, 4L, 5L, 5L, 1L, 2L, 2L, 1L, 3L, 3L, 2L, 1L, 3L, 1L, 5L, 5L, 1L, 4L, 3L, 4L, 4L, 2L, 5L, 3L, 3L, 5L, 2L, 1L, 1L, 3L, 3L, 1L, 3L, 1L, 5L, 5L, 3L, 5L, 1L, 4L, 3L, 3L, 3L, 2L, 4L, 1L, 3L, 3L, 2L, 3L, 3L, 5L, 4L, 5L, 2L, 3L, 5L, 3L, 1L, 1L, 3L, 5L, 3L, 1L, 2L, 3L, 1L, 5L, 1L, 3L, 3L, 2L, 2L, 3L, 3L, 1L, 1L, 1L, 1L, 5L, 3L, 3L, 2L, 2L, 4L, 3L, 3L, 3L, 5L, 2L, 5L, 4L, 1L, 3L, 4L, 5L, 5L, 3L, 3L, 1L, 3L, 1L, 2L, 1L, 5L, 5L, 2L, 1L, 3L, 5L, 5L, 1L, 2L, 5L, 3L, 5L, 3L, 5L, 4L, 5L, 5L, 1L, 2L, 4L, 1L, 1L, 1L, 4L, 5L, 3L, 3L, 4L, 2L, 5L, 2L, 3L, 2L, 3L, 5L, 3L, 5L, 5L, 3L, 3L, 4L, 1L, 3L, 3L, 5L, 5L, 3L, 5L, 1L, 5L, 1L, 3L, 3L, 5L, 3L, 1L, 1L, 5L, 3L, 3L, 3L, 2L, 3L, 1L, 1L, 3L, 5L, 5L, 3L, 3L, 4L, 3L, 3L, 1L, 1L, 5L, 1L, 5L, 1L, 1L, 3L, 3L, 3L, 4L, 2L, 2L, 3L, 3L, 5L, 1L, 5L)), nfactors = 3L, rotation = "varimax", estimator = "WLSMV", ordered = c("x1", "x2", "x3", "x4", "x5", "x6"), missing = "available.cases", slot_sample_stats = new("lavSampleStats", var = list(c(1, 1, 1, 1, 1, 1)), cov = list(c(1, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, -0.0528665611502654, 0.847708645568633, 1, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, 0.852266877770598, 0.866098037290729, 1, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, -0.045025067439856, -0.00562422746118933, -0.0468064624916715, 1, 0.854835831983838, 0.8624962089988, 0.0187792727635132, 0.0637607092511551, 0.0271693531291436, 0.854835831983838, 1, 0.864362516433594, -0.0528665611502654, 0.00299593013986168, -0.0307059937186903, 0.8624962089988, 0.864362516433594, 1)), mean = list( c(0, 0, 0, 0, 0, 0)), th = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951)), th.idx = list( c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 6L, 6L, 6L, 6L)), th.names = list(c("x1|t1", "x1|t2", "x1|t3", "x1|t4", "x2|t1", "x2|t2", "x2|t3", "x2|t4", "x3|t1", "x3|t2", "x3|t3", "x3|t4", "x4|t1", "x4|t2", "x4|t3", "x4|t4", "x5|t1", "x5|t2", "x5|t3", "x5|t4", "x6|t1", "x6|t2", "x6|t3", "x6|t4")), res.cov = list(NULL), res.var = list( NULL), res.th = list(NULL), res.th.nox = list(NULL), res.slopes = list(NULL), res.int = list(NULL), mean.x = list( NULL), cov.x = list(NULL), bifreq = list(NULL), group.w = list( 1), nobs = list(300L), ntotal = 300L, ngroups = 1L, x.idx = list(integer(0)), icov = list(NULL), cov.log.det = list( NULL), res.icov = list(NULL), res.cov.log.det = list( NULL), ridge = 0, WLS.obs = list(c(-0.954165253146194, -0.467698799114508, 0.449136303439425, 1.00825234717068, -0.941074530352976, -0.439913165673234, 0.524400512708041, 0.853587957511572, -0.902734791643865, -0.458397807359904, 0.467698799114508, 0.994457883209753, -1.00825234717068, -0.394335532100823, 0.486423874628588, 0.967421566101701, -0.841621233572914, -0.412463129441405, 0.553384719555673, 0.915365087842814, -0.80642124701824, -0.458397807359904, 0.505321088513851, 0.760983928488951, 0.847708645568633, 0.852266877770598, -0.045025067439856, 0.0187792727635132, -0.0528665611502654, 0.866098037290729, -0.00562422746118933, 0.0637607092511551, 0.00299593013986168, -0.0468064624916715, 0.0271693531291436, -0.0307059937186903, 0.854835831983838, 0.8624962089988, 0.864362516433594)), WLS.V = list(NULL), WLS.VD = list(c(0.45383482142755, 0.587709518619898, 0.591395244765584, 0.435865310988534, 0.458128368522494, 0.593178170698077, 0.575667399853721, 0.486139871182117, 0.470559146996906, 0.589572474383863, 0.587709518619898, 0.440480678601174, 0.435865310988534, 0.601506349600645, 0.583861633032411, 0.449463546185201, 0.489866730490175, 0.598291135869332, 0.569072720318582, 0.466488951106186, 0.500662923226088, 0.589572474383863, 0.579848639230085, 0.514201673558285, 7.44280585633078, 6.75326246420858, 0.68465337775283, 0.747098037875909, 0.711965105740159, 11.6264723451673, 0.71957812751013, 0.780476688725976, 0.738014115692331, 0.688027249018883, 0.764993477317059, 0.751303879951114, 8.27390801013265, 8.47099984869401, 10.1221593413523)), NACOV = list(c(2.20344484994446, 1.2774226485315, 0.608464081144384, 0.438580200934569, 1.24211958837833, 1.06100103747073, 0.579645270096896, 0.476730975188745, 1.17367332415033, 1.00896404529906, 0.601140069897175, 0.44176715543208, -0.219015644772081, -0.0242678714026954, -0.0379083822845332, 0.079081810080948, -0.0564610061408481, -0.120072924149705, 0.107363949033218, 0.109435686051998, -0.169568169571692, -0.238028958705595, -0.0135053916825915, -0.0269051436957956, 0.148317263761989, 0.15574465153135, -0.0301086318650708, 0.00933114409349929, -0.0308508864967571, 0.110777263526235, 0.00948677799058494, -0.00412089339286978, -0.10125465414037, 0.0785862105655183, 0.0555335781266458, -0.0638553156597295, -0.0280957630388753, -0.00123067312283201, -0.0342607132374605, 1.2774226485315, 1.70152085055262, 0.810471242285935, 0.584186727382364, 1.14089096616285, 1.11498605030749, 0.74527622661719, 0.635003375993402, 1.06755750714773, 1.03707982565867, 0.748585766358322, 0.588431735511437, -0.195764701197282, -0.057578351381687, -0.0504937836682346, -0.0373067097809645, 0.0599296137472571, -0.0417199784040522, 0.0501041505326083, 0.0809914034723241, -0.102201933410529, -0.130802860893886, -0.0148660064484897, 0.0449437782925636, 0.0741651928462058, 0.0490907248507851, -0.0176892046762685, 0.00394541784101921, -0.00847157050708947, 0.0757812257161068, -0.0661029519937833, -0.0252830371146104, -0.0476247917553443, -0.0264569477560322, 0.0323015886413371, -0.0169096775619646, -0.00652515275734159, -0.0245753162929485, -0.0110359863231057, 0.608464081144384, 0.810471242285935, 1.69091653822204, 1.21881067112823, 0.576674081941792, 0.774285253955362, 1.0792024722852, 1.05804201981214, 0.625589760454923, 0.815394330786237, 1.12783689455862, 1.15169768636051, 0.0136079556709071, 0.0243719568965317, -0.0184270459355523, -0.0493207998636407, 0.0858315089017964, 0.0837418857774159, -0.0113399097133595, 0.0479013123640107, 0.0827363125250564, -0.0337960621007554, -0.0540468233753761, 0.0344537680314544, -0.0835035702275452, -0.0786770150818312, 0.0106760261359684, -0.00123494659659294, 0.0122565252286696, -0.0592467719700587, -0.0412145589031354, -0.0176224865986117, -0.0380983101009663, -0.0402960408343714, -0.0522514103795643, -0.0445701055393561, 0.0398832411621319, 0.005478944302505, 0.0388495658350893, 0.438580200934569, 0.584186727382364, 1.21881067112823, 2.29428673213755, 0.441666799275109, 0.594893883378979, 1.19451162375741, 1.29095297173797, 0.450924370633182, 0.587735283838845, 1.16371239045051, 1.39753600268651, 0.0789137392518928, 0.0110390707298294, -0.146050804979038, -0.157518417294168, 0.0198461232749442, -0.0386675911959832, -0.106723079606281, 0.0285854186705204, -0.00626559185412115, -0.0310691387157628, -0.135030448940603, -0.116121963366209, -0.159334208125366, -0.139085742363334, 0.0271974707303992, -0.0071037068500013, 0.0263069574461733, -0.128992483494249, 0.107707346627344, 0.0946179973328222, 0.127452670358713, 0.110027033838194, 0.0789431409081486, 0.0904561706745593, 0.00997923231952932, -0.00851490425935088, 0.020452480807499, 1.24211958837833, 1.14089096616285, 0.576674081941792, 0.441666799275109, 2.18279431859916, 1.25161307106614, 0.58372464286605, 0.480086067447278, 1.29726260924579, 0.984812668193073, 0.605370716739469, 0.444876182620165, -0.170594704793659, -0.000939948520669462, -0.099353327882025, -0.121499556217292, 0.120824019421084, 0.0113621668615782, -0.0729739856394577, -0.0317318220007143, -0.0866730771247237, -0.174358692112653, -0.0760810863132528, -0.0604073968525699, 0.16194297708138, 0.120827352177701, -0.0919049501204477, -0.0267557831346448, -0.0881523522151011, 0.128137179839506, 0.000212298869746207, 0.0367164551098905, -0.00373340788228093, -0.000447770974788038, 0.0150078675242675, -0.0585860797001331, -0.0031712854387501, -0.0178213100814595, -0.00791788041762326, 1.06100103747073, 1.11498605030749, 0.774285253955362, 0.594893883378979, 1.25161307106614, 1.68583412100813, 0.786235732883992, 0.64664191532757, 1.13913953707982, 1.17862045059145, 0.81539146061268, 0.599216695337057, -0.134627822737602, -0.0578543768292243, -0.0254499315393859, -0.0184196260647881, 0.0394524588887727, -0.0165793698112683, 0.0190914135644343, 0.169073277814853, -0.057167462611575, -0.154022807307125, 0.0880784013810653, 0.0342100668274375, 0.0539361700938887, 0.0615567447500341, -0.0681981562446394, -0.0246495398767953, -0.0554549756281441, 0.0717566895580845, 5.75617068663093e-06, 0.0204479578807549, 7.74832431628764e-05, 0.00318648418314011, 0.0406344952019763, 0.00971501942601362, -0.00345081806988481, -0.0155256161093073, 0.0078896468194146, 0.579645270096895, 0.74527622661719, 1.0792024722852, 1.19451162375741, 0.58372464286605, 0.786235732883992, 1.73711417435502, 1.42869471567676, 0.595959822290149, 0.670001492928105, 1.18493558332661, 1.16630442958261, 0.163795908274427, 0.109091022310938, -0.00540981015134475, -1.57046074786481e-16, 0.102731959227697, 0.146522255839915, 0.0252065688162364, 0.138836295431548, 0.0964684652932333, 0.0827491883696062, 0.120136315645039, -0.00321012859252077, -0.0858800421247186, -0.0451906419084792, -0.0765124055981449, -0.0495654183174262, -0.0848028980005815, -0.0833098166158672, -0.000535439721952539, -0.0120376783586505, 0.00713013186502567, 0.00519137622969441, 0.0317853983114957, 0.0120483492539913, 0.0335091835712613, -0.0158877338895445, 0.0458021905858184, 0.476730975188745, 0.635003375993402, 1.05804201981214, 1.29095297173797, 0.480086067447278, 0.64664191532757, 1.42869471567676, 2.05702115641813, 0.490148927129519, 0.571882388380539, 1.21484756042805, 1.46125569212401, 0.212680617707058, 0.145119741737691, -0.0165152518961889, -0.0882562149935091, 0.206218263545022, 0.166099245009795, -0.00386514223473117, 0.0174182527862748, 0.0997440147141751, 0.103034832027179, 0.0653127512676339, -0.0071150608221477, -0.134071027660114, -0.0976632797843361, -0.137740647801462, -0.129333918235308, -0.117770415220244, -0.155270199765802, 0.00279700652525927, -0.029357693070375, 0.00385735432182198, -0.0242062457633788, -0.0532930035886563, -0.00857750561667388, 0.0767430961264705, -0.00352146452370503, 0.0679798285981358, 1.17367332415033, 1.06755750714773, 0.625589760454923, 0.450924370633182, 1.29726260924579, 1.13913953707982, 0.595959822290149, > test-esem.R: 0.49014892712952, 2.1251313599618, 1.30132191861677, 0.618059609401317, 0.454201024362567, -0.241597776915651, -0.0362922311272902, -0.098028891044111, -0.142411540832355, 0.0448569291718996, -0.0239915790387723, -0.0385217266559336, 0.0430732015144227, -0.111115021635821, -0.132288435076582, -0.0047687613849894, -0.0301359480319713, 0.138783846835874, 0.13451304238041, -0.0723053721025387, 0.0235559639025693, -0.0229809041838941, 0.14579926213725, -0.0346675510650626, 0.0278921595163239, -0.0029584179876469, -0.0143270955539256, 0.0186565372953722, -0.0162965216843151, -0.00917673037167745, 0.00379043849646447, 0.00436030761914487, 1.00896404529906, 1.03707982565867, 0.815394330786237, 0.587735283838845, 0.984812668193073, 1.17862045059145, 0.670001492928105, 0.571882388380539, 1.30132191861677, 1.69614431380138, 0.805579524235362, 0.592006077646191, -0.0849566905132264, 0.0345326507924104, -0.042071892364949, -0.0309553186878741, 0.119344126776945, 0.0764956513097508, -0.0235887381762751, 0.0516400329150373, 0.0202881363683058, -0.0352304618528652, -0.0595609077281687, 0.0516911215418863, 0.0687933674969333, 0.0369020237224323, 0.00995076809763176, 0.064092949342599, 0.0369408306412495, 0.0799479942345352, 0.005592058134837, 0.0487302938257757, 0.0493669036835191, -0.0138630042221855, 0.00884439739842633, -0.00367260312735112, 0.0351601326522669, 0.00839475638588036, 0.0119231550404147, 0.601140069897175, 0.748585766358322, 1.12783689455862, 1.16371239045051, 0.605370716739469, 0.81539146061268, 1.18493558332661, 1.21484756042805, 0.618059609401317, 0.805579524235362, 1.70152085055262, 1.2504174379618, 0.118080295960265, 0.0828320142683918, -0.133598135955537, -0.186533548904822, 0.0732473056910928, 0.0671589896260352, -0.104565183720226, 0.0255762326754712, 0.0375171654291813, -0.0508677792365115, -0.0647733138112737, -0.0137328211449501, -0.0724591490523034, -0.0791267384446038, 0.00181309216736721, -0.0214221821010069, -0.0300017587548346, -0.0877579746528331, 0.10479954023783, 0.0704790601404688, 0.0725730814762955, 0.0132397293060142, 0.00392597583562099, 0.00574676565142401, 0.0545645893278382, 0.00351526032811938, 0.0482644269885699, 0.44176715543208, 0.588431735511437, 1.15169768636051, 1.39753600268651, 0.444876182620165, 0.599216695337057, 1.16630442958261, 1.46125569212401, 0.454201024362567, 0.592006077646191, 1.2504174379618, 2.27024713813936, 0.200952889275185, -0.0133620970402425, -0.0788523417871815, -0.219328304783088, 0.176164832903571, 0.0493539480970899, -0.116865540995329, 0.0187955189173209, 0.00380285492607957, -0.0183094663189546, -0.0671092644366832, -0.0330283840404653, -0.139306280370751, -0.13875441713431, 0.0668223880050227, -0.0448927653441914, 0.0318365551567394, -0.151806904210309, 0.148960920619109, 0.0609038763998929, 0.134305485249476, 0.031169280380637, -0.0100546599966053, 0.0170376579092655, 0.0337745421542386, -0.000211240075709474, 0.0322855829479996, -0.219015644772081, -0.195764701197282, 0.0136079556709071, 0.0789137392518928, -0.170594704793659, -0.134627822737602, 0.163795908274427, 0.212680617707058, -0.241597776915651, -0.0849566905132264, 0.118080295960265, 0.200952889275185, 2.29428673213755, 1.15558999503623, 0.577148887654197, 0.435492094872112, 1.27015188959644, 1.06222147579554, 0.553093374537492, 0.447838225838153, 1.35577768351094, 1.11397687818633, 0.570187169159342, 0.488208361335366, -0.0452073659278695, -0.0368039242195606, -0.0249465575779013, -0.157562953805574, -0.0510773841561005, -0.0144087480818, -0.000875250301410177, -0.102613201353469, 0.000573271171747722, -0.0360467188781403, -0.106138266021219, -0.00157974786814207, 0.155628564410312, 0.153818992474422, 0.166944494374591, -0.0242678714026954, -0.057578351381687, 0.0243719568965317, 0.0110390707298294, -0.000939948520669464, -0.0578543768292243, 0.109091022310938, 0.145119741737691, -0.0362922311272901, 0.0345326507924104, 0.0828320142683918, -0.0133620970402424, 1.15558999503623, 1.66249284095492, 0.830316892679672, 0.626521943879109, 0.974188874780071, 1.1002507213572, 0.742943487462754, 0.64428374039232, 1.10176290111632, 1.11577341589458, 0.743140939070639, 0.702362350920955, -0.0228496292950282, -0.00169230710749049, -0.0100558231103412, -0.00378787104048013, -0.0243505783648102, 0.0045802720538116, 0.0072931844882099, 0.0359904807552618, -0.0170014618557995, -0.0151073514301341, 0.0160490751802889, 0.00744705291894205, 0.0506965702279097, 0.0646531323927172, 0.0136332585073733, -0.0379083822845332, -0.0504937836682345, -0.0184270459355523, -0.146050804979038, -0.099353327882025, -0.0254499315393859, -0.00540981015134475, -0.0165152518961889, -0.098028891044111, -0.042071892364949, -0.133598135955537, -0.0788523417871815, 0.577148887654197, 0.830316892679671, 1.71273456487676, 1.29235692829569, 0.631548022402756, 0.768991594381702, 1.17427537880214, 1.1139472986559, 0.644167387922915, 0.76968868646083, 1.18316692085857, 1.25985049764384, -0.0497100849928933, 0.0114243324019316, 0.0145262770963222, 0.0972680602138176, 0.0637726699623928, 0.012559878300944, -0.00486631793652915, 0.0635513532398554, 0.0254927803908756, 0.00644936625016048, 0.0984423108227788, 0.0677157657287604, -0.0765907638253904, -0.07315026181056, -0.0918071222196781, 0.0790818100809479, -0.0373067097809646, -0.0493207998636407, -0.157518417294168, -0.121499556217292, -0.0184196260647881, -1.83037594978595e-16, -0.0882562149935091, -0.142411540832355, -0.0309553186878741, -0.186533548904822, -0.219328304783088, 0.435492094872112, 0.626521943879109, 1.29235692829569, 2.22487453874168, 0.476539376877921, 0.618983350337493, 1.14976137667066, 1.42361294424794, 0.486061415374205, 0.600533182544757, 1.05121838213894, 1.15403067874422, -0.0158659044150101, 0.0563346056670746, 0.0236919740312106, 0.103285956119985, -0.000130894536512416, 0.0205212058726693, -0.007320814773629, 0.0875644703300589, -0.00850467831901114, 0.0127667492155082, 0.17068413621789, 0.0662442892600502, -0.152316211916453, -0.145043021521224, -0.119582194867943, -0.056461006140848, 0.0599296137472572, 0.0858315089017964, 0.0198461232749443, 0.120824019421084, 0.0394524588887727, 0.102731959227697, 0.206218263545022, 0.0448569291718996, 0.119344126776945, 0.0732473056910928, 0.176164832903571, 1.27015188959644, 0.974188874780071, 0.631548022402756, 0.476539376877921, 2.04137153588563, 1.28678875419635, 0.605225158300069, 0.490049191698183, 1.2559069292527, 1.04757622393096, 0.623930127537152, 0.534224411962442, -0.00822479371015104, 0.00663271019471845, 0.019465008972702, 0.00885836454286383, 0.0422893759118978, 0.00923383989163264, 0.0428107979498749, 0.0357418739580545, 0.142453716502339, 0.0307344604466001, 0.0109412500742362, 0.0843708232885414, 0.134776830038491, 0.118952680023042, 0.141748124176178, -0.120072924149705, -0.0417199784040522, 0.0837418857774159, -0.0386675911959832, 0.0113621668615782, -0.0165793698112683, 0.146522255839915, 0.166099245009794, -0.0239915790387723, 0.0764956513097508, 0.0671589896260352, 0.0493539480970899, 1.06222147579554, 1.1002507213572, 0.768991594381703, 0.618983350337493, 1.28678875419635, 1.67142706961048, 0.786135027597283, 0.636531428934211, 1.09154115621558, 1.11501277174014, 0.758613312330241, 0.693911211524711, -0.00264628084991393, -0.020670859392103, 0.0206585540721674, 0.0076120270915056, 0.01977840827582, 0.00887062962888688, 0.0857746926208271, 0.0129649274588139, 0.0930336131142227, 0.0639141756310739, 0.00174847079953262, 0.0826773995441732, 0.0577716250034614, 0.0240332716358964, 0.062104419291224, 0.107363949033218, 0.0501041505326083, -0.0113399097133595, -0.106723079606281, -0.0729739856394577, 0.0190914135644343, 0.0252065688162364, -0.00386514223473116, -0.0385217266559336, -0.0235887381762751, -0.104565183720226, -0.116865540995329, 0.553093374537492, 0.742943487462754, 1.17427537880214, 1.14976137667066, 0.605225158300069, 0.786135027597283, 1.75724466187761, 1.42283630209259, 0.549741259193713, 0.708475550052955, 1.22914973668607, 1.25763749578798, -0.0296908946602319, 0.0104200414391291, -0.0145720736487281, 0.0033195334097242, 0.0304989245705094, 0.0248134478800154, 0.019809047212115, -0.0278335902754632, 0.0775381432887526, 0.0170624923090307, -0.00828708360663368, 0.0575131343085677, -0.0862221610584902, -0.0960292154420592, -0.121941490751061, 0.109435686051998, 0.0809914034723241, 0.0479013123640107, 0.0285854186705205, -0.0317318220007143, 0.169073277814853, 0.138836295431548, 0.0174182527862748, 0.0430732015144227, 0.0516400329150374, 0.0255762326754712, 0.0187955189173209, 0.447838225838153, 0.64428374039232, 1.1139472986559, 1.42361294424794, 0.490049191698183, 0.636531428934211, 1.42283630209259, 2.14367349457838, 0.499841178456957, 0.617558201846951, 1.24599523308296, 1.40112741396321, -0.0394721249953512, 0.0370330313771152, -0.0431359339076604, -0.00738449211276925, -0.0854782307059588, 0.0247920992730687, -0.0973040204633906, -0.0424219899345994, -0.10773335775287, -0.0699475831262572, -0.0137548007419955, -0.0746340366111427, -0.14926687959738, -0.122855476743761, -0.153408764961069, -0.169568169571692, -0.102201933410529, 0.0827363125250564, -0.00626559185412116, -0.0866730771247237, -0.057167462611575, 0.0964684652932333, 0.0997440147141751, -0.111115021635821, 0.0202881363683058, 0.0375171654291814, 0.00380285492607959, 1.35577768351094, 1.10176290111632, 0.644167387922915, 0.486061415374205, 1.2559069292527, 1.09154115621558, 0.549741259193713, 0.499841178456957, 1.99735181817812, 1.37283056092203, 0.636397275021004, 0.544899092090007, -0.03708872669238, -0.00935414748115647, -0.00786735696938561, -0.0369559317351903, -0.0235867391754614, 0.00555327458708414, -0.0315362339684262, 0.00408552460269166, -0.000542481453965008, -0.0349182900330659, -0.0522477483772834, -0.0194906592088833, 0.0890398368213926, 0.131204656804499, 0.153319351221939, -0.238028958705595, -0.130802860893886, -0.0337960621007554, -0.0310691387157628, -0.174358692112653, -0.154022807307125, 0.0827491883696063, 0.103034832027179, -0.132288435076582, -0.0352304618528652, -0.0508677792365115, -0.0183094663189545, 1.11397687818633, 1.11577341589458, 0.76968868646083, 0.600533182544757, 1.04757622393096, 1.11501277174014, 0.708475550052955, 0.617558201846951, 1.37283056092203, 1.69614431380138, 0.786274468293161, 0.673227653107653, -0.0249870847892577, -0.0310623448791116, -0.0597662654253912, -0.0500516446493022, -0.0205554406398311, 0.00347675808841012, -0.0686655886007817, 0.00959998906957744, -0.00634275627248089, -0.0513443431595157, -0.00110780602245252, -0.0123907039927979, 0.0395883128666614, 0.0716961735842288, 0.0545351763997118, -0.0135053916825915, -0.0148660064484897, -0.0540468233753762, -0.135030448940603, -0.0760810863132528, 0.0880784013810652, 0.120136315645039, 0.0653127512676339, -0.00476876138498948, -0.0595609077281687, -0.0647733138112737, -0.0671092644366832, 0.570187169159342, 0.743140939070639, 1.18316692085857, 1.05121838213894, 0.623930127537152, 0.758613312330241, 1.22914973668607, 1.24599523308296, 0.636397275021004, 0.786274468293161, 1.72458799132095, 1.47663490650412, -0.0171591736580541, 0.0168446332834493, 0.0156862359188135, 0.033364333452295, 0.017604243021788, 0.0417778807218433, -0.0266860377378277, -0.00837804674737573, -0.00682932784787414, -0.0185360321639612, 0.00923449433845097, 0.0103019254283266, -0.0913713589057094, -0.0780111274536073, -0.103938786698107, -0.0269051436957957, 0.0449437782925636, 0.0344537680314544, -0.116121963366209, -0.0604073968525698, 0.0342100668274374, -0.00321012859252068, -0.0071150608221477, -0.0301359480319713, 0.0516911215418863, -0.0137328211449501, -0.0330283840404653, 0.488208361335366, 0.702362350920954, 1.25985049764384, 1.15403067874422, 0.534224411962442, 0.693911211524711, 1.25763749578798, 1.40112741396321, 0.544899092090007, 0.673227653107653, > test-esem.R: 1.47663490650412, 1.94476224295417, -0.0600572970215252, -0.0129462981571512, -0.0383334777746061, 0.0618573160951042, 0.0275218234991843, 0.0130731844584642, -0.0693311489782209, 0.0476073305366232, -0.00861177497025037, -0.104231047599455, -0.00601795258733618, 0.00995636294223921, -0.110540740333587, -0.122682130683992, -0.132968263756207, 0.148317263761989, 0.0741651928462058, -0.0835035702275452, -0.159334208125366, 0.161942977081381, 0.0539361700938887, -0.0858800421247186, -0.134071027660114, 0.138783846835874, 0.0687933674969333, -0.0724591490523034, -0.139306280370751, -0.0452073659278695, -0.0228496292950282, -0.0497100849928933, -0.0158659044150101, -0.00822479371015103, -0.00264628084991393, -0.0296908946602319, -0.0394721249953512, -0.03708872669238, -0.0249870847892577, -0.0171591736580541, -0.0600572970215252, 0.13435793157891, 0.0648999991313963, 0.0163257727891063, 0.0222001474813885, 0.00586415479170394, 0.0553201434932848, -0.00774333873252011, -0.00406552748573637, -0.00893407703646892, 0.00190480732538636, 0.00711445555663318, -0.00993507647126291, -0.00346764772535688, -0.00584038224322596, -0.0043281721243053, 0.15574465153135, 0.0490907248507852, -0.0786770150818312, -0.139085742363334, 0.120827352177701, 0.0615567447500341, -0.0451906419084792, -0.0976632797843361, 0.13451304238041, 0.0369020237224324, -0.0791267384446038, -0.13875441713431, -0.0368039242195606, -0.00169230710749049, 0.0114243324019316, 0.0563346056670746, 0.00663271019471846, -0.020670859392103, 0.0104200414391291, 0.0370330313771152, -0.00935414748115647, -0.0310623448791116, 0.0168446332834493, -0.0129462981571512, 0.0648999991313963, 0.148076578586997, 0.0102311998810714, 0.0360677109152718, 0.0157559499489283, 0.0471580164973155, -0.024660772824432, 0.00213812557707964, -0.0216906952994601, -0.0148339752411867, 0.018408323287891, -0.0189706498549756, -0.0118850547463466, -0.00878063137456458, -0.00695610027104775, -0.0301086318650708, -0.0176892046762685, 0.0106760261359684, 0.0271974707303992, -0.0919049501204477, -0.0681981562446394, -0.0765124055981449, -0.137740647801462, -0.0723053721025387, 0.00995076809763175, 0.00181309216736721, 0.0668223880050227, -0.0249465575779013, -0.0100558231103412, 0.0145262770963222, 0.0236919740312106, 0.0194650089727021, 0.0206585540721674, -0.0145720736487281, -0.0431359339076604, -0.00786735696938561, -0.0597662654253913, 0.0156862359188135, -0.0383334777746061, 0.0163257727891063, 0.0102311998810714, 1.46059310082162, 1.05092773064802, 1.14570089017992, -0.000204120425811351, 1.0924386835732, 0.800404470692711, 0.866078362448077, 1.06893041162047, 0.767172388010609, 0.812608776357063, 5.64931156303635e-06, 0.0102626772585488, 0.00490334272631464, 0.00933114409349929, 0.00394541784101922, -0.00123494659659295, -0.0071037068500013, -0.0267557831346448, -0.0246495398767953, -0.0495654183174262, -0.129333918235308, 0.0235559639025693, 0.064092949342599, -0.0214221821010069, -0.0448927653441914, -0.157562953805574, -0.00378787104048014, 0.0972680602138176, 0.103285956119985, 0.00885836454286384, 0.00761202709150559, 0.00331953340972421, -0.00738449211276925, -0.0369559317351903, -0.0500516446493022, 0.033364333452295, 0.0618573160951042, 0.0222001474813885, 0.0360677109152718, 1.05092773064801, 1.33851241644687, 1.0552643434031, 0.0164763439450202, 0.793710751295646, 1.05114166617281, 0.785239966039694, 0.790106915227831, 1.02177932037355, 0.772375497705721, -0.0457924736654755, -0.0294483813254788, -0.0249420219318624, -0.0308508864967572, -0.00847157050708947, 0.0122565252286696, 0.0263069574461733, -0.0881523522151011, -0.0554549756281442, -0.0848028980005815, -0.117770415220244, -0.0229809041838941, 0.0369408306412495, -0.0300017587548346, 0.0318365551567393, -0.0510773841561005, -0.0243505783648102, 0.0637726699623928, -0.000130894536512413, 0.0422893759118978, 0.01977840827582, 0.0304989245705094, -0.0854782307059588, -0.0235867391754614, -0.0205554406398311, 0.017604243021788, 0.0275218234991843, 0.00586415479170394, 0.0157559499489283, 1.14570089017992, 1.0552643434031, 1.40456321796895, 0.002375688741747, 0.854793847130113, 0.798909003312101, 1.08161905449057, 0.881489941991868, 0.812215657741097, 1.0699033568652, -0.0256936941471223, -0.0192954594118436, 0.00388272127596111, 0.110777263526235, 0.0757812257161068, -0.0592467719700587, -0.128992483494249, 0.128137179839506, 0.0717566895580845, -0.0833098166158672, -0.155270199765802, 0.14579926213725, 0.0799479942345352, -0.0877579746528331, -0.151806904210309, -0.0144087480818, 0.0045802720538116, 0.012559878300944, 0.0205212058726693, 0.00923383989163264, 0.00887062962888688, 0.0248134478800154, 0.0247920992730687, 0.00555327458708413, 0.00347675808841012, 0.0417778807218433, 0.0130731844584642, 0.0553201434932848, 0.0471580164973155, -0.000204120425811351, 0.0164763439450202, 0.002375688741747, 0.0860106118444142, -0.019900141742653, -0.00853341765654292, -0.0214039745610184, 0.00329365658923978, 0.018798081814193, 0.00581948595103035, -0.00488309654925988, 0.00560377528198599, -0.0120229152759623, 0.00948677799058492, -0.0661029519937833, -0.0412145589031353, 0.107707346627344, 0.000212298869746286, 5.75617068664727e-06, -0.000535439721952491, 0.00279700652525929, -0.0346675510650626, 0.005592058134837, 0.10479954023783, 0.148960920619109, -0.000875250301410178, 0.0072931844882099, -0.00486631793652915, -0.00732081477362901, 0.0428107979498749, 0.0857746926208272, 0.019809047212115, -0.0973040204633905, -0.0315362339684262, -0.0686655886007816, -0.0266860377378277, -0.0693311489782208, -0.00774333873252011, -0.024660772824432, 1.0924386835732, 0.793710751295646, 0.854793847130113, -0.019900141742653, 1.38970316324119, 0.981893200602164, 1.08597201729475, 1.11220858116664, 0.765698559147951, 0.82894666600568, 0.0142986764803992, 0.010614318885733, 0.0160737255995745, -0.0041208933928698, -0.0252830371146104, -0.0176224865986117, 0.0946179973328222, 0.0367164551098905, 0.0204479578807549, -0.0120376783586505, -0.029357693070375, 0.0278921595163239, 0.0487302938257758, 0.0704790601404688, 0.0609038763998929, -0.102613201353469, 0.0359904807552618, 0.0635513532398554, 0.0875644703300589, 0.0357418739580544, 0.0129649274588139, -0.0278335902754632, -0.0424219899345994, 0.00408552460269165, 0.00959998906957744, -0.00837804674737573, 0.0476073305366232, -0.00406552748573637, 0.00213812557707964, 0.800404470692711, 1.05114166617281, 0.798909003312101, -0.00853341765654293, 0.981893200602164, 1.28126824855252, 0.953252779725438, 0.79984192501233, 1.00662688239373, 0.729381828929068, -0.0329019063108192, -0.0136956271030428, -0.0107407756452412, -0.10125465414037, -0.0476247917553443, -0.0380983101009663, 0.127452670358713, -0.00373340788228093, 7.74832431628925e-05, 0.00713013186502569, 0.00385735432182198, -0.00295841798764691, 0.0493669036835192, 0.0725730814762955, 0.134305485249476, 0.000573271171747709, -0.0170014618557995, 0.0254927803908756, -0.00850467831901116, 0.142453716502339, 0.0930336131142227, 0.0775381432887526, -0.10773335775287, -0.000542481453965015, -0.0063427562724809, -0.00682932784787413, -0.00861177497025037, -0.00893407703646892, -0.0216906952994601, 0.866078362448077, 0.785239966039694, 1.08161905449057, -0.0214039745610184, 1.08597201729475, 0.953252779725438, 1.35498763334885, 0.910480398190892, 0.75340726253597, 1.0564303582682, 0.00579222433398088, -0.00895211036399707, 0.0266774382853429, 0.0785862105655182, -0.0264569477560322, -0.0402960408343714, 0.110027033838194, -0.000447770974788044, 0.00318648418314012, 0.00519137622969441, -0.0242062457633788, -0.0143270955539256, -0.0138630042221855, 0.0132397293060142, 0.031169280380637, -0.0360467188781403, -0.0151073514301341, 0.0064493662501605, 0.0127667492155082, 0.0307344604466001, 0.0639141756310739, 0.0170624923090307, -0.0699475831262572, -0.0349182900330659, -0.0513443431595157, -0.0185360321639612, -0.104231047599455, 0.00190480732538636, -0.0148339752411867, 1.06893041162047, 0.790106915227831, 0.881489941991868, 0.00329365658923978, 1.11220858116664, 0.79984192501233, 0.910480398190892, 1.45343080732047, 1.05062470048119, 1.10783285444028, 0.00482548296748707, 0.0192021029400786, 0.0155516790039065, 0.0555335781266458, 0.0323015886413371, -0.0522514103795643, 0.0789431409081487, 0.0150078675242675, 0.0406344952019763, 0.0317853983114957, -0.0532930035886563, 0.0186565372953721, 0.00884439739842633, 0.00392597583562098, -0.0100546599966053, -0.106138266021218, 0.0160490751802889, 0.0984423108227788, 0.17068413621789, 0.0109412500742362, 0.00174847079953263, -0.00828708360663369, -0.0137548007419955, -0.0522477483772834, -0.00110780602245253, 0.00923449433845097, -0.00601795258733618, 0.00711445555663318, 0.018408323287891, 0.76717238801061, 1.02177932037355, 0.812215657741097, 0.018798081814193, 0.765698559147951, 1.00662688239373, 0.75340726253597, 1.05062470048119, 1.30720068817729, 1.01913616621123, -0.0536652115645841, -0.019213861470815, -0.0172908302087426, -0.0638553156597295, -0.0169096775619646, -0.0445701055393561, 0.0904561706745593, -0.0585860797001331, 0.00971501942601363, 0.0120483492539913, -0.00857750561667388, -0.0162965216843151, -0.00367260312735112, 0.00574676565142401, 0.0170376579092655, -0.00157974786814208, 0.00744705291894205, 0.0677157657287604, 0.0662442892600502, 0.0843708232885414, 0.0826773995441732, 0.0575131343085677, -0.0746340366111427, -0.0194906592088833, -0.0123907039927979, 0.0103019254283266, 0.00995636294223919, -0.00993507647126291, -0.0189706498549756, 0.812608776357063, 0.772375497705721, 1.0699033568652, 0.00581948595103035, 0.82894666600568, 0.729381828929068, 1.0564303582682, 1.10783285444028, 1.01913616621123, 1.33101934741115, -0.0160332825788463, -0.0194673047264479, 0.0076134333416248, -0.0280957630388753, -0.00652515275734159, 0.0398832411621319, 0.00997923231952932, -0.00317128543875011, -0.00345081806988481, 0.0335091835712613, 0.0767430961264705, -0.00917673037167745, 0.0351601326522669, 0.0545645893278382, 0.0337745421542386, 0.155628564410312, 0.0506965702279097, -0.0765907638253904, -0.152316211916453, 0.134776830038491, 0.0577716250034614, -0.0862221610584902, -0.14926687959738, 0.0890398368213926, 0.0395883128666614, -0.0913713589057094, -0.110540740333588, -0.00346764772535688, -0.0118850547463466, 5.64931156303779e-06, -0.0457924736654755, -0.0256936941471223, -0.00488309654925988, 0.0142986764803992, -0.0329019063108192, 0.00579222433398088, 0.00482548296748707, -0.0536652115645841, -0.0160332825788463, 0.120861870687388, 0.0659352781421284, 0.0637822024211485, -0.00123067312283201, -0.0245753162929485, 0.005478944302505, -0.00851490425935088, -0.0178213100814595, -0.0155256161093073, -0.0158877338895445, -0.00352146452370504, 0.00379043849646447, 0.00839475638588036, 0.00351526032811938, -0.00021124007570947, 0.153818992474422, 0.0646531323927172, -0.07315026181056, -0.145043021521224, 0.118952680023042, 0.0240332716358964, -0.0960292154420592, -0.122855476743761, 0.131204656804499, 0.0716961735842288, -0.0780111274536073, -0.122682130683992, -0.00584038224322596, -0.00878063137456458, 0.0102626772585488, -0.0294483813254788, -0.0192954594118436, 0.00560377528198599, 0.010614318885733, -0.0136956271030428, -0.00895211036399707, 0.0192021029400786, -0.019213861470815, -0.0194673047264479, 0.0659352781421284, 0.118049819131347, 0.0482278273076368, -0.0342607132374605, -0.0110359863231057, 0.0388495658350893, 0.020452480807499, > test-esem.R: -0.00791788041762326, 0.0078896468194146, 0.0458021905858184, 0.0679798285981358, 0.00436030761914487, 0.0119231550404147, 0.0482644269885699, 0.0322855829479996, 0.166944494374591, 0.0136332585073733, -0.0918071222196781, -0.119582194867943, 0.141748124176178, 0.0621044192912241, -0.121941490751061, -0.153408764961069, 0.153319351221939, 0.0545351763997117, -0.103938786698107, -0.132968263756207, -0.00432817212430529, -0.00695610027104775, 0.00490334272631464, -0.0249420219318624, 0.00388272127596111, -0.0120229152759623, 0.0160737255995745, -0.0107407756452412, 0.0266774382853429, 0.0155516790039065, -0.0172908302087426, 0.0076134333416248, 0.0637822024211485, 0.0482278273076368, 0.0987931493939915)), NACOV.user = FALSE, missing.flag = FALSE, missing = list(NULL), missing.h1 = list( NULL), YLp = list(NULL), zero.cell.tables = list( c("x1", "x1", "x2", "x4", "x4", "x5", "x2", "x3", "x3", "x5", "x6", "x6")))) > test-esem.R: 15: do.call(lavaan::efa, efa_args) > test-esem.R: 16: withCallingHandlers(expr, warning = function(w) if (inherits(w, classes)) tryInvokeRestart("muffleWarning")) > test-esem.R: 17: suppressWarnings(do.call(lavaan::efa, efa_args)) > test-esem.R: 18: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 19: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 20: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 21: tryCatch(suppressWarnings(do.call(lavaan::efa, efa_args)), error = function(e) { structure(list(msg = conditionMessage(e)), class = "esem_fit_error")}) > test-esem.R: 22: .esem_fit_one(k, data_df, estimator, cor, ordered_cols, lav_missing, ss_in = ss, r_lv_in = r_lv, item_names = item_names, p = p, keep_fit = keep_fits) > test-esem.R: 23: ...future.FUN(...future.X_jj, ...) > test-esem.R: 24: FUN(X[[i]], ...) > test-esem.R: 25: lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) }}) > test-esem.R: 26: (function (...) { "# future::getGlobalsAndPackages(): FUN() uses '...' internally " "# without having an '...' argument. This means '...' is treated" "# as a global variable. This may happen when FUN() is an " "# anonymous function. " "# " "# If an anonymous function, we will make sure to restore the " "# function environment of FUN() to the calling environment. " "# We assume FUN() an anonymous function if it lives in the " "# global environment, which is where globals are written. " penv <- env <- environment(...future.FUN) repeat { if (identical(env, globalenv()) || identical(env, emptyenv())) break penv <- env env <- parent.env(env) } if (identical(penv, globalenv())) { environment(...future.FUN) <- environment() } else if (!identical(penv, emptyenv()) && !is.null(penv) && !isNamespace(penv)) { parent.env(penv) <- environment() } rm(list = c("env", "penv"), inherits = FALSE) { "# future.apply:::future_xapply(): preserve future option" ...future.globals.maxSize.org <- getOption("future.globals.maxSize") if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { oopts <- options(future.globals.maxSize = ...future.globals.maxSize) on.exit(options(oopts), add = TRUE) } { "# future.apply::future_lapply(): process chunk of elements while setting random seeds" lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) } }) } }})() > test-esem.R: 27: do.call(function(...) { "# future::getGlobalsAndPackages(): FUN() uses '...' internally " "# without having an '...' argument. This means '...' is treated" "# as a global variable. This may happen when FUN() is an " "# anonymous function. " "# " "# If an anonymous function, we will make sure to restore the " "# function environment of FUN() to the calling environment. " "# We assume FUN() an anonymous function if it lives in the " "# global environment, which is where globals are written. " penv <- env <- environment(...future.FUN) repeat { if (identical(env, globalenv()) || identical(env, emptyenv())) break penv <- env env <- parent.env(env) } if (identical(penv, globalenv())) { environment(...future.FUN) <- environment() } else if (!identical(penv, emptyenv()) && !is.null(penv) && !isNamespace(penv)) { parent.env(penv) <- environment() } rm(list = c("env", "penv"), inherits = FALSE) { "# future.apply:::future_xapply(): preserve future option" ...future.globals.maxSize.org <- getOption("future.globals.maxSize") if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { oopts <- options(future.globals.maxSize = ...future.globals.maxSize) on.exit(options(oopts), add = TRUE) } { "# future.apply::future_lapply(): process chunk of elements while setting random seeds" lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) } }) } }}, args = future.call.arguments) > test-esem.R: 28: eval(quote({ { "# future::getGlobalsAndPackages(): wrapping the original future" "# expression in do.call(), because function called uses '...' " "# as a global variable " do.call(function(...) { "# future::getGlobalsAndPackages(): FUN() uses '...' internally " "# without having an '...' argument. This means '...' is treated" "# as a global variable. This may happen when FUN() is an " "# anonymous function. " "# " "# If an anonymous function, we will make sure to restore the " "# function environment of FUN() to the calling environment. " "# We assume FUN() an anonymous function if it lives in the " "# global environment, which is where globals are written. " penv <- env <- environment(...future.FUN) repeat { if (identical(env, globalenv()) || identical(env, emptyenv())) break penv <- env env <- parent.env(env) } if (identical(penv, globalenv())) { environment(...future.FUN) <- environment() } else if (!identical(penv, emptyenv()) && !is.null(penv) && !isNamespace(penv)) { parent.env(penv) <- environment() } rm(list = c("env", "penv"), inherits = FALSE) { "# future.apply:::future_xapply(): preserve future option" ...future.globals.maxSize.org <- getOption("future.globals.maxSize") if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { oopts <- options(future.globals.maxSize = ...future.globals.maxSize) on.exit(options(oopts), add = TRUE) } { "# future.apply::future_lapply(): process chunk of elements while setting random seeds" > test-esem.R: lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) } }) } } }, args = future.call.arguments) }}), new.env()) > test-esem.R: 29: eval(quote({ { "# future::getGlobalsAndPackages(): wrapping the original future" "# expression in do.call(), because function called uses '...' " "# as a global variable " do.call(function(...) { "# future::getGlobalsAndPackages(): FUN() uses '...' internally " "# without having an '...' argument. This means '...' is treated" "# as a global variable. This may happen when FUN() is an " "# anonymous function. " "# " "# If an anonymous function, we will make sure to restore the " "# function environment of FUN() to the calling environment. " "# We assume FUN() an anonymous function if it lives in the " "# global environment, which is where globals are written. " penv <- env <- environment(...future.FUN) repeat { if (identical(env, globalenv()) || identical(env, emptyenv())) break penv <- env env <- parent.env(env) } if (identical(penv, globalenv())) { environment(...future.FUN) <- environment() } else if (!identical(penv, emptyenv()) && !is.null(penv) && !isNamespace(penv)) { parent.env(penv) <- environment() } rm(list = c("env", "penv"), inherits = FALSE) { "# future.apply:::future_xapply(): preserve future option" ...future.globals.maxSize.org <- getOption("future.globals.maxSize") if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { oopts <- options(future.globals.maxSize = ...future.globals.maxSize) on.exit(options(oopts), add = TRUE) } { "# future.apply::future_lapply(): process chunk of elements while setting random seeds" lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) } }) } } }, args = future.call.arguments) }}), new.env()) > test-esem.R: 30: eval(expr, p) > test-esem.R: 31: eval(expr, p) > test-esem.R: 32: eval.parent(substitute(eval(quote(expr), envir))) > test-esem.R: 33: local({ { "# future::getGlobalsAndPackages(): wrapping the original future" "# expression in do.call(), because function called uses '...' " "# as a global variable " do.call(function(...) { "# future::getGlobalsAndPackages(): FUN() uses '...' internally " "# without having an '...' argument. This means '...' is treated" "# as a global variable. This may happen when FUN() is an " "# anonymous function. " "# " "# If an anonymous function, we will make sure to restore the " "# function environment of FUN() to the calling environment. " "# We assume FUN() an anonymous function if it lives in the " "# global environment, which is where globals are written. " penv <- env <- environment(...future.FUN) repeat { if (identical(env, globalenv()) || identical(env, emptyenv())) break penv <- env env <- parent.env(env) } if (identical(penv, globalenv())) { environment(...future.FUN) <- environment() } else if (!identical(penv, emptyenv()) && !is.null(penv) && !isNamespace(penv)) { parent.env(penv) <- environment() } rm(list = c("env", "penv"), inherits = FALSE) { "# future.apply:::future_xapply(): preserve future option" ...future.globals.maxSize.org <- getOption("future.globals.maxSize") if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { oopts <- options(future.globals.maxSize = ...future.globals.maxSize) on.exit(options(oopts), add = TRUE) } { "# future.apply::future_lapply(): process chunk of elements while setting random seeds" lapply(seq_along(...future.elements_ii), FUN = function(jj) { ...future.X_jj <- ...future.elements_ii[[jj]] assign(".Random.seed", ...future.seeds_ii[[jj]], envir = globalenv(), inherits = FALSE) { ...future.FUN(...future.X_jj, ...) } }) } } }, args = future.call.arguments) }}) > test-esem.R: 34: eval(expr, envir = globalenv()) > test-esem.R: 35: eval(expr, envir = globalenv()) > test-esem.R: 36: withVisible({ eval(expr, envir = globalenv())}) > test-esem.R: 37: withCallingHandlers({ ...future.value <- withVisible({ eval(expr, envir = globalenv()) }) seed <- globalenv()[[".Random.seed"]] FutureResult(value = ...future.value[["value"]], visible = ...future.value[["visible"]], conditions = ...future.conditions, rng = !identical(seed, ...future.rng), seed = seed, uuid = uuid, misuseGlobalEnv = if (checkGlobalenv) list(added = diff_globalenv(...future.globalenv.names)) else NULL, misuseConnections = if (checkConnections) diff_connections(get_connections(details = isTRUE(attr(checkConnections, "details", exact = TRUE))), ...future.connections) else NULL, misuseDevices = if (checkDevices) diff_devices(...future.devices, base::.Devices) else NULL, misuseDefaultDevice = ...future.option.defaultDevice, started = ...future.startTime)}, condition = onEvalCondition) > test-esem.R: 38: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 39: tryCatch({ withCallingHandlers({ ...future.value <- withVisible({ eval(expr, envir = globalenv()) }) seed <- globalenv()[[".Random.seed"]] FutureResult(value = ...future.value[["value"]], visible = ...future.value[["visible"]], conditions = ...future.conditions, rng = !identical(seed, ...future.rng), seed = seed, uuid = uuid, misuseGlobalEnv = if (checkGlobalenv) list(added = diff_globalenv(...future.globalenv.names)) else NULL, misuseConnections = if (checkConnections) diff_connections(get_connections(details = isTRUE(attr(checkConnections, "details", exact = TRUE))), ...future.connections) else NULL, misuseDevices = if (checkDevices) diff_devices(...future.devices, base::.Devices) else NULL, misuseDefaultDevice = ...future.option.defaultDevice, started = ...future.startTime) }, condition = onEvalCondition)}, finally = { setTimeLimit(cpu = Inf, elapsed = Inf, transient = FALSE)}) > test-esem.R: 40: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 41: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 42: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) > test-esem.R: 43: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 44: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) > test-esem.R: 45: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 46: tryCatch({ tryCatch({ withCallingHandlers({ ...future.value <- withVisible({ eval(expr, envir = globalenv()) }) seed <- globalenv()[[".Random.seed"]] FutureResult(value = ...future.value[["value"]], visible = ...future.value[["visible"]], conditions = ...future.conditions, rng = !identical(seed, ...future.rng), seed = seed, uuid = uuid, misuseGlobalEnv = if (checkGlobalenv) list(added = diff_globalenv(...future.globalenv.names)) else NULL, misuseConnections = if (checkConnections) diff_connections(get_connections(details = isTRUE(attr(checkConnections, "details", exact = TRUE))), ...future.connections) else NULL, misuseDevices = if (checkDevices) diff_devices(...future.devices, base::.Devices) else NULL, misuseDefaultDevice = ...future.option.defaultDevice, started = ...future.startTime) }, condition = onEvalCondition) }, finally = { setTimeLimit(cpu = Inf, elapsed = Inf, transient = FALSE) })}, interrupt = onEvalErrorOrInterrupt, error = onEvalErrorOrInterrupt) > test-esem.R: 47: evalFutureInternal(data) > test-esem.R: 48: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 49: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 50: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 51: tryCatch({ evalFutureInternal(data)}, error = function(ex) { msg <- sprintf("future::evalFuture() failed on %s (pid %s) at %s", Sys.info()[["nodename"]], Sys.getpid(), format(Sys.time(), "%FT%T")) if (!requireNamespace("future")) { msg <- sprintf("%s. Package 'future' is not available (worker library path: %s)", msg, paste(sQuote(.libPaths()), collapse = ", ")) } else { ns <- getNamespace("future") if (!exists("evalFutureInternal", mode = "function", envir = ns, inherits = FALSE)) { msg <- sprintf("%s. Package 'future' version %s is too old. Please update and retry", msg, packageVersion("future")) } else { msg <- sprintf("%s. Using package 'future' v%s", msg, packageVersion("future")) } } msg <- sprintf("%s. Possible other reasons: %s", msg, conditionMessage(ex)) call <- conditionCall(ex) if (!is.null(call)) { call <- deparse(call, width.cutoff = 500L) call <- paste(call, collapse = " -> ") msg <- sprintf("%s [in %s]", msg, call) } ex <- simpleError(msg) class(ex) <- c("FutureLaunchError", "FutureError", class(ex)) ex}) > test-esem.R: 52: evalFuture(data) > test-esem.R: 53: eval(expr, env) > test-esem.R: 54: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 55: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 56: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 57: tryCatch(expr, error = function(e) { call <- conditionCall(e) if (!is.null(call)) { if (identical(call[[1L]], quote(doTryCatch))) call <- sys.call(-4L) dcall <- deparse(call, nlines = 1L) prefix <- paste("Error in", dcall, ": ") LONG <- 75L sm <- strsplit(conditionMessage(e), "\n")[[1L]] w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w") if (is.na(w)) w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L], type = "b") if (w > LONG) prefix <- paste0(prefix, "\n ") } else prefix <- "Error : " msg <- paste0(prefix, conditionMessage(e), "\n") .Internal(seterrmessage(msg[1L])) if (!silent && isTRUE(getOption("show.error.messages"))) { cat(msg, file = outFile) .Internal(printDeferredWarnings()) } invisible(structure(msg, class = "try-error", condition = e))}) > test-esem.R: 58: try(eval(expr, env), silent = TRUE) > test-esem.R: 59: serialize(what, NULL, xdr = FALSE) > test-esem.R: 60: sendMaster(try(eval(expr, env), silent = TRUE), FALSE) > test-esem.R: 61: mcparallel(evalFuture(data)) > test-esem.R: 62: (function() { oopts <- options(mc.cores = NULL) on.exit(options(oopts)) mcparallel(evalFuture(data))})() > test-esem.R: 63: launchFuture.MulticoreFutureBackend(backend, future = future) > test-esem.R: 64: launchFuture(backend, future = future) > test-esem.R: 65: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 66: > test-esem.R: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 67: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) > test-esem.R: 68: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 69: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) > test-esem.R: 70: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 71: tryCatch({ launchFuture(backend, future = future)}, FutureError = function(ex) { future[["state"]] <- "failed" stop(ex)}, error = function(ex) { msg <- conditionMessage(ex) label <- sQuoteLabel(future) msg <- sprintf("Caught an unexpected error of class %s when trying to launch future (%s) on backend of class %s. The reason was: %s", class(ex)[1], label, class(backend)[1], msg) future[["state"]] <- "failed" stop(FutureLaunchError(msg, future = future))}) > test-esem.R: 72: run.Future(future) > test-esem.R: 73: run(future) > test-esem.R: 74: future(expr, substitute = FALSE, envir = future.envir, stdout = future.stdout, conditions = future.conditions, globals = globals_ii, packages = packages_ii, seed = future.seed, label = labels[ii]) > test-esem.R: 75: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 76: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 77: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) > test-esem.R: 78: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 79: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) > test-esem.R: 80: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 81: tryCatch({ for (ii in seq_along(chunks)) { chunk <- chunks[[ii]] if (debug) mdebugf("Chunk #%d of %d ...", ii, length(chunks)) args_ii <- get_chunk(chunk_args, chunk) globals_ii <- globals globals_ii[["...future.elements_ii"]] <- args_ii packages_ii <- packages if (scanForGlobals) { if (debug) mdebugf(" - Finding globals in '%s' for chunk #%d ...", args_name, ii) gp <- getGlobalsAndPackages(args_ii, envir = envir, globals = TRUE) globals_args <- gp$globals packages_args <- gp$packages gp <- NULL if (debug) { mdebugf(" + additional globals found: [n=%d] %s", length(globals_args), commaq(names(globals_args))) mdebugf(" + additional namespaces needed: [n=%d] %s", length(packages_args), commaq(packages_args)) } if (length(globals_args) > 0L) { reserved <- intersect(c("...future.FUN", "...future.elements_ii", "...future.seeds_ii"), names(globals_args)) if (length(reserved) > 0) { stop("Detected globals in '%s' using reserved variables names: ", args_name, commaq(reserved)) } globals_args <- as.FutureGlobals(globals_args) globals_ii <- unique(c(globals_ii, globals_args)) if (length(packages_args) > 0L) packages_ii <- unique(c(packages_ii, packages_args)) } if (debug) mdebugf(" - Finding globals in '%s' for chunk #%d ... DONE", args_name, ii) } args_ii <- NULL if (!is.null(globals.maxSize)) { globals_ii["...future.globals.maxSize"] <- list(globals.maxSize) } if (length(chunks) > 1L) { options(future.globals.maxSize = length(chunks) * globals.maxSize.default) if (debug) mdebugf(" - Adjusted option 'future.globals.maxSize': %.0f -> %d * %.0f = %.0f (bytes)", globals.maxSize.default, length(chunks), globals.maxSize.default, getOption("future.globals.maxSize")) on.exit(options(future.globals.maxSize = globals.maxSize), add = TRUE) } if (is.null(seeds)) { if (debug) mdebug(" - seeds: <none>") } else { if (debug) mdebugf(" - seeds: [%d] <seeds>", length(chunk)) globals_ii[["...future.seeds_ii"]] <- seeds[chunk] } if (debug) { mdebugf(" - All globals exported: [n=%d] %s", length(globals_ii), commaq(names(globals_ii))) } fs[[ii]] <- future(expr, substitute = FALSE, envir = future.envir, stdout = future.stdout, conditions = future.conditions, globals = globals_ii, packages = packages_ii, seed = future.seed, label = labels[ii]) if (debug) { mdebug("Created future:") mprint(fs[[ii]]) } rm(list = c("chunk", "globals_ii")) if (debug) mdebugf("Chunk #%d of %d ... DONE", ii, nchunks) } if (debug) mdebugf("Launching %d futures (chunks) ... DONE", nchunks) if (debug) mdebugf("Resolving %d futures (chunks) ...", nchunks) if (isFALSE(future.seed)) { withCallingHandlers({ values <- local({ oopts <- options(future.rng.onMisuse.keepFuture = FALSE) on.exit(options(oopts)) value(fs) }) }, RngFutureCondition = function(cond) { idx <- NULL uuid <- attr(cond, "uuid") if (!is.null(uuid)) { for (kk in seq_along(fs)) { if (identical(fs[[kk]]$uuid, uuid)) idx <- kk } } else { f <- attr(cond, "future") if (is.null(f)) return() if (!isFALSE(f$seed)) return() for (kk in seq_along(fs)) { if (identical(fs[[kk]], f)) idx <- kk } } if (is.null(idx)) return() f <- fs[[idx]] label <- sQuoteLabel(f) message <- sprintf("UNRELIABLE VALUE: One of the %s iterations (%s) unexpectedly generated random numbers without declaring so. There is a risk that those random numbers are not statistically sound and the overall results might be invalid. To fix this, specify 'future.seed=TRUE'. This ensures that proper, parallel-safe random numbers are produced via a parallel RNG method. To disable this check, use 'future.seed = NULL', or set option 'future.rng.onMisuse' to \"ignore\".", sQuote(.packageName), label) cond$message <- message if (inherits(cond, "warning")) { warning(cond) invokeRestart("muffleWarning") } else if (inherits(cond, "error")) { stop(cond) } }) } else { value(fs) }}, interrupt = function(int) { onInterrupt(int, fcn_name = fcn_name, debug = debug)}, error = function(e) { onError(e, futures = fs, debug = debug)}) > test-esem.R: 82: future_xapply(FUN = FUN, nX = nX, chunk_args = X, args = list(...), get_chunk = `chunkWith[[`, expr = expr, envir = envir, future.envir = future.envir, future.globals = future.globals, future.packages = future.packages, future.scheduling = future.scheduling, future.chunk.size = future.chunk.size, future.stdout = future.stdout, future.conditions = future.conditions, future.seed = future.seed, future.label = future.label, fcn_name = fcn_name, args_name = args_name, debug = debug) > test-esem.R: 83: future.apply::future_lapply(X, FUN, future.seed = TRUE) > test-esem.R: 84: .esem_lapply(seq.int(2L, k_max), function(k) { .esem_fit_one(k, data_df, estimator, cor, ordered_cols, lav_missing, ss_in = ss, r_lv_in = r_lv, item_names = item_names, p = p, keep_fit = keep_fits)}) > test-esem.R: 85: esem_levels(data_mat, k_max = k_max, estimator = estimator_eff, cor = cor, R_external = R_ext, keep_fits = keep_fits, missing = missing) > test-esem.R: 86: ackwards(d, k_max = 3, engine = "esem", cor = "polychoric", seed = 42) > test-esem.R: 87: withCallingHandlers(expr, warning = function(w) if (inherits(w, classes)) tryInvokeRestart("muffleWarning")) > test-esem.R: 88: suppressWarnings(ackwards(d, k_max = 3, engine = "esem", cor = "polychoric", seed = 42)) > test-esem.R: 89: > test-esem.R: withCallingHandlers(expr, message = function(c) if (inherits(c, classes)) tryInvokeRestart("muffleMessage")) > test-esem.R: 90: suppressMessages(suppressWarnings(ackwards(d, k_max = 3, engine = "esem", cor = "polychoric", seed = 42))) > test-esem.R: 91: eval(code, test_env) > test-esem.R: 92: eval(code, test_env) > test-esem.R: 93: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt) > test-esem.R: 94: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 95: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 96: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 97: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal) > test-esem.R: 98: doWithOneRestart(return(expr), restart) > test-esem.R: 99: withOneRestart(expr, restarts[[1L]]) > test-esem.R: 100: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { }) > test-esem.R: 101: test_code(code, parent.frame()) > test-esem.R: 102: test_that("ESEM results are identical across serial and parallel future plans", { skip_if_not_installed("lavaan") skip_if_not_installed("future") skip_if_not_installed("future.apply") skip_on_os("windows") skip_if(!future::supportsMulticore(), "multicore plan unavailable here") d <- .make_ordinal_data() future::plan(future::sequential) serial <- suppressMessages(suppressWarnings(ackwards(d, k_max = 3, engine = "esem", cor = "polychoric", seed = 42))) future::plan(future::multicore, workers = 2) on.exit(future::plan(future::sequential), add = TRUE) par <- suppressMessages(suppressWarnings(ackwards(d, k_max = 3, engine = "esem", cor = "polychoric", seed = 42))) for (ki in seq_along(serial$levels)) { expect_equal(serial$levels[[ki]]$loadings, par$levels[[ki]]$loadings, info = paste("loadings level", ki)) } expect_equal(tidy(serial)$r, tidy(par)$r) }) > test-esem.R: 103: eval(code, test_env) > test-esem.R: 104: eval(code, test_env) > test-esem.R: 105: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt) > test-esem.R: 106: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 107: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 108: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 109: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal) > test-esem.R: 110: doWithOneRestart(return(expr), restart) > test-esem.R: 111: withOneRestart(expr, restarts[[1L]]) > test-esem.R: 112: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { }) > test-esem.R: 113: test_code(code = exprs, env = env, reporter = get_reporter() %||% StopReporter$new()) > test-esem.R: 114: source_file(path, env = env(env), desc = desc, shuffle = shuffle, error_call = error_call) > test-esem.R: 115: test_one_file(path, env = the$testing_env, shuffle = shuffle) > test-esem.R: 116: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 117: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 118: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 119: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL}) > test-esem.R: 120: with_reporter(multi, test_one_file(path, env = the$testing_env, shuffle = shuffle)) > test-esem.R: 121: asNamespace("testthat")$queue_task(path, shuffle) > test-esem.R: 122: (function (path, shuffle) { asNamespace("testthat")$queue_task(path, shuffle)})(base::quote("test-esem.R"), base::quote(FALSE)) > test-esem.R: 123: (function (what, args, quote = FALSE, envir = parent.frame()) { if (!is.list(args)) stop("second argument must be a list") if (quote) args <- lapply(args, enquote) .Internal(do.call(what, args, envir))})(base::quote(function (path, shuffle) { asNamespace("testthat")$queue_task(path, shuffle)}), base::quote(list("test-esem.R", FALSE)), envir = base::quote(<environment>), quote = base::quote(TRUE)) > test-esem.R: 124: base::do.call(base::do.call, base::c(base::readRDS("/Volumes/Temp/tmp/RtmpgXlzzN/callr-fun-bac54d82eff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE) > test-esem.R: 125: base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/Volumes/Temp/tmp/RtmpgXlzzN/callr-fun-bac54d82eff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", compress = FALSE) > test-esem.R: 126: base::withCallingHandlers({ { NULL NULL } base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/Volumes/Temp/tmp/RtmpgXlzzN/callr-fun-bac54d82eff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) { > test-esem.R: NULL NULL } base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } if (callr_data$has_otel) { callr_data$otel_span$record_exception(e2) } base::saveRDS(base::list("error", e2, e), file = base::paste0("/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } if (callr_data$has_otel) { callr_data$otel_span$record_exception(e2) } base::saveRDS(base::list("error", e2, e), file = base::paste0("/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", ".error")) }}, callr_message = function(e) { base::try({ callr_data <- base::as.environment("tools:callr")$`__callr_data__` pxlib <- callr_data$pxlib if (base::is.null(e$code)) { e$code <- "301" } msg <- base::paste0("base64::", pxlib$base64_encode(base::serialize(e, NULL))) data <- base::paste0(e$code, " ", base::nchar(msg), "\n", msg) if (callr_data$has_otel) { callr_data$otel_span$add_event("callr message", attributes = list(status_code = e$code)) } pxlib$write_fd(3L, data) if (base::inherits(e, "cli_message") && !base::is.null(base::findRestart("cli_message_handled"))) { base::invokeRestart("cli_message_handled") } else if (base::inherits(e, "message") && !base::is.null(base::findRestart("muffleMessage"))) { base::invokeRestart("muffleMessage") } })}) > test-esem.R: 127: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 128: tryCatchOne(expr, names, parentenv, handlers[[1L]]) > test-esem.R: 129: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) > test-esem.R: 130: doTryCatch(return(expr), name, parentenv, handler) > test-esem.R: 131: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) > test-esem.R: 132: tryCatchList(expr, classes, parentenv, handlers) > test-esem.R: 133: base::tryCatch(base::withCallingHandlers({ { NULL NULL } base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/Volumes/Temp/tmp/RtmpgXlzzN/callr-fun-bac54d82eff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) { NULL NULL } base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } if (callr_data$has_otel) { callr_data$otel_span$record_exception(e2) } base::saveRDS(base::list("error", e2, e), file = base::paste0("/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } if (callr_data$has_otel) { callr_data$otel_span$record_exception(e2) } base::saveRDS(base::list("error", e2, e), file = base::paste0("/Volumes/Temp/tmp/RtmpgXlzzN/callr-rs-result-bac5cf569d5", ".error")) }}, callr_message = function(e) { base::try({ callr_data <- base::as.environment("tools:callr")$`__callr_data__` pxlib <- callr_data$pxlib if (base::is.null(e$code)) { e$code <- "301" } msg <- base::paste0("base64::", pxlib$base64_encode(base::serialize(e, NULL))) data <- base::paste0(e$code, " ", base::nchar(msg), "\n", msg) if (callr_data$has_otel) { callr_data$otel_span$add_event("callr message", attributes = list(status_code = e$code)) } pxlib$write_fd(3L, data) if (base::inherits(e, "cli_message") && !base::is.null(base::findRestart("cli_message_handled"))) { base::invokeRestart("cli_message_handled") } else if (base::inherits(e, "message") && !base::is.null(base::findRestart("muffleMessage"))) { base::invokeRestart("muffleMessage") } })}), error = function(e) { { NULL NULL } if (FALSE) { base::try(base::stop(e)) } if (FALSE) { base::q(save = "no", status = 1) } base::invisible()}, interrupt = function(e) { { NULL NULL } if (FALSE) { base::q(save = "no", status = 1) } base::invisible()}) > test-esem.R: An irrecoverable exception occurred. R is aborting now ... Saving _problems/test-esem-630.R > test-check-items.R: > test-check-items.R: -- Item quality check (ackwards) ----------------------------------------------- > test-check-items.R: Basis: pearson > test-check-items.R: Items: 5 > test-check-items.R: Flagged: 0 > test-check-items.R: v No item problems detected. > test-check-items.R: -------------------------------------------------------------------------------- > test-check-items.R: Constant items must be dropped (no variance). A near-constant item (one > test-check-items.R: response dominates) can yield a meaningless factor; a sparse category can make > test-check-items.R: `cor = "polychoric"` fail -- collapse rare categories, try `correct = 0`, or > test-check-items.R: drop the item. Full per-item table: treat this object as a data frame. > test-check-items.R: > test-check-items.R: -- Item quality check (ackwards) ----------------------------------------------- > test-check-items.R: Basis: polychoric > test-check-items.R: Items: 7 > test-check-items.R: Flagged: 2 > test-check-items.R: > test-check-items.R: -- Flagged items -- > test-check-items.R: > test-check-items.R: x constant: "const" > test-check-items.R: ! near-constant: "nc" > test-check-items.R: -------------------------------------------------------------------------------- > test-check-items.R: Constant items must be dropped (no variance). A near-constant item (one > test-check-items.R: response dominates) can yield a meaningless factor; a sparse category can make > test-check-items.R: `cor = "polychoric"` fail -- collapse rare categories, try `correct = 0`, or > test-check-items.R: drop the item. Full per-item table: treat this object as a data frame. > test-comparability.R: i Fitting 2 split-half replicates (pca, k = 1-3)... > test-comparability.R: v Fitting 2 split-half replicates (pca, k = 1-3)... [31ms] > test-comparability.R: > test-comparability.R: > test-comparability.R: -- Split-Half Factor Comparability (ackwards) ---------------------------------- > test-comparability.R: Engine: pca > test-comparability.R: Basis: pearson > test-comparability.R: n: 1,000 (500 per half) > test-comparability.R: Splits: 2 > test-comparability.R: Levels: 1-3 > test-comparability.R: > test-comparability.R: -- Comparability by level (median across splits) -- > test-comparability.R: > test-comparability.R: k = 1: median r 1.00, min r 1.00 (m1f1) > test-comparability.R: k = 2: median r 1.00, min r 1.00 (m2f2) > test-comparability.R: k = 3: median r .73, min r .28 (m3f2) [1/2 splits usable] > test-comparability.R: -------------------------------------------------------------------------------- > test-comparability.R: Per-factor detail (incl. Tucker's φ) in `$summary`; per-split values in > test-comparability.R: `$coefficients`. > test-comparability.R: Conventional benchmarks: >= .90 replication floor (Everett, 1983; Saucier et > test-comparability.R: al., 2005), >= .95 factors interchangeable (Lorenzo-Seva & ten Berge, 2006) -- > test-comparability.R: conventions, not tests. Interpret levels whose factors all replicate. > test-comparability.R: i Fitting 2 split-half replicates (pca, k = 1-3)... > test-comparability.R: v Fitting 2 split-half replicates (pca, k = 1-3)... [36ms] > test-comparability.R: > test-comparability.R: > test-comparability.R: -- Split-Half Factor Comparability (ackwards) ---------------------------------- > test-comparability.R: Engine: pca > test-comparability.R: Basis: pearson > test-comparability.R: n: 1,000 (500 per half) > test-comparability.R: Splits: 2 > test-comparability.R: Levels: 1-3 > test-comparability.R: > test-comparability.R: -- Comparability by level (median across splits) -- > test-comparability.R: > test-comparability.R: k = 1: median r 1.00, min r 1.00 (m1f1) > test-comparability.R: k = 2: median r 1.00, min r 1.00 (m2f2) > test-comparability.R: k = 3: no usable splits (half-solutions did not converge) > test-comparability.R: -------------------------------------------------------------------------------- > test-comparability.R: Per-factor detail (incl. Tucker's φ) in `$summary`; per-split values in > test-comparability.R: `$coefficients`. > test-comparability.R: Conventional benchmarks: >= .90 replication floor (Everett, 1983; Saucier et > test-comparability.R: al., 2005), >= .95 factors interchangeable (Lorenzo-Seva & ten Berge, 2006) -- > test-comparability.R: conventions, not tests. Interpret levels whose factors all replicate. > test-comparability.R: > test-comparability.R: -- Split-Half Factor Comparability (ackwards) ---------------------------------- > test-comparability.R: Engine: pca > test-comparability.R: Basis: pearson > test-comparability.R: n: 1,000 (500 per half) > test-comparability.R: Splits: 4 > test-comparability.R: Levels: 1-5 > test-comparability.R: > test-comparability.R: -- Comparability by level (median across splits) -- > test-comparability.R: > test-comparability.R: k = 1: median r 1.00, min r 1.00 (m1f1) > test-comparability.R: k = 2: median r 1.00, min r 1.00 (m2f1) > test-comparability.R: k = 3: median r .80, min r .58 (m3f2) > test-comparability.R: k = 4: median r 1.00, min r 1.00 (m4f2) > test-comparability.R: k = 5: median r .99, min r .14 (m5f5) > test-comparability.R: -------------------------------------------------------------------------------- > test-comparability.R: Per-factor detail (incl. Tucker's φ) in `$summary`; per-split values in > test-comparability.R: `$coefficients`. > test-comparability.R: Conventional benchmarks: >= .90 replication floor (Everett, 1983; Saucier et > test-comparability.R: al., 2005), >= .95 factors interchangeable (Lorenzo-Seva & ten Berge, 2006) -- > test-comparability.R: conventions, not tests. Interpret levels whose factors all replicate. > test-comparability.R: > test-comparability.R: -- Split-Half Factor Comparability (ackwards) ---------------------------------- > test-comparability.R: Engine: pca > test-comparability.R: Basis: pearson > test-comparability.R: n: 1,000 (500 per half) > test-comparability.R: Splits: 4 > test-comparability.R: Levels: 1-5 > test-comparability.R: > test-comparability.R: -- Comparability by level (median across splits) -- > test-comparability.R: > test-comparability.R: k = 1: median r 1.00, min r 1.00 (m1f1) > test-comparability.R: k = 2: median r 1.00, min r 1.00 (m2f1) > test-comparability.R: k = 3: median r .80, min r .58 (m3f2) > test-comparability.R: k = 4: median r 1.00, min r 1.00 (m4f2) > test-comparability.R: k = 5: median r .99, min r .14 (m5f5) > test-comparability.R: -------------------------------------------------------------------------------- > test-comparability.R: Per-factor detail (incl. Tucker's φ) in `$summary`; per-split values in > test-comparability.R: `$coefficients`. > test-comparability.R: Conventional benchmarks: >= .90 replication floor (Everett, 1983; Saucier et > test-comparability.R: al., 2005), >= .95 factors interchangeable (Lorenzo-Seva & ten Berge, 2006) -- > test-comparability.R: conventions, not tests. Interpret levels whose factors all replicate. > test-cor-input.R: > test-cor-input.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-cor-input.R: Engine: pca > test-cor-input.R: Rotation: varimax > test-cor-input.R: Basis: (user-supplied matrix) > test-cor-input.R: n: NA > test-cor-input.R: k (max): 3 > test-cor-input.R: > test-cor-input.R: -- Levels -- > test-cor-input.R: > test-cor-input.R: v k = 1: 1 factor, 41.8% variance > test-cor-input.R: v k = 2: 2 factors, 58.5% variance > test-cor-input.R: v k = 3: 3 factors, 72.2% variance > test-cor-input.R: > test-cor-input.R: -- Edges -- > test-cor-input.R: > test-cor-input.R: 5 of 8 edges have |r| >= 0.3 > test-cor-input.R: -------------------------------------------------------------------------------- > test-cor-input.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-cor-input.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-cor-input.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-cor-input.R: they do not validate the edges or the hierarchy itself. > test-cor-input.R: > test-cor-input.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-cor-input.R: Engine: pca > test-cor-input.R: Rotation: varimax > test-cor-input.R: Basis: (user-supplied matrix) > test-cor-input.R: n: NA > test-cor-input.R: k (max): 3 > test-cor-input.R: > test-cor-input.R: -- Levels -- > test-cor-input.R: > test-cor-input.R: v k = 1: 1 factor, 41.8% variance > test-cor-input.R: v k = 2: 2 factors, 58.5% variance > test-cor-input.R: v k = 3: 3 factors, 72.2% variance > test-cor-input.R: > test-cor-input.R: -- Edges -- > test-cor-input.R: > test-cor-input.R: 5 of 8 edges have |r| >= 0.3 > test-cor-input.R: -------------------------------------------------------------------------------- > test-cor-input.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-cor-input.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-cor-input.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-cor-input.R: they do not validate the edges or the hierarchy itself. > test-comparability.R: > test-comparability.R: Likely variables with missing values are i6 > test-comparability.R: > test-comparability.R: Likely variables with missing values are i6 > test-cor-input.R: > test-cor-input.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-cor-input.R: Variables: 6 > test-cor-input.R: n: 875 > test-cor-input.R: Basis: (user-supplied matrix) > test-cor-input.R: Tested k: 1-5 > test-cor-input.R: > test-cor-input.R: -- Criteria (k = 1-5) -- > test-cor-input.R: > test-cor-input.R: k = 1: PA-PC v PA-FA v MAP 0.0461* VSS-1 0.7025 VSS-2 0.0000 > test-cor-input.R: k = 2: PA-PC - PA-FA v MAP 0.1279 VSS-1 0.7919* VSS-2 0.8159 > test-cor-input.R: k = 3: PA-PC - PA-FA v MAP 0.2614 VSS-1 0.7666 VSS-2 0.8879 > test-cor-input.R: k = 4: PA-PC - PA-FA - MAP 0.4712 VSS-1 0.6796 VSS-2 0.9054* > test-cor-input.R: k = 5: PA-PC - PA-FA - MAP 1.0000 VSS-1 0.7009 VSS-2 0.8935 > test-cor-input.R: + CD skipped (requires raw data; not available for matrix input). > test-cor-input.R: > test-cor-input.R: -- Recommendations -- > test-cor-input.R: > test-cor-input.R: * PA-PC: k <= 1 > test-cor-input.R: * PA-FA: k <= 3 > test-cor-input.R: * MAP: k = 1 > test-cor-input.R: * VSS-1: k = 2 > test-cor-input.R: * VSS-2: k = 4 > test-cor-input.R: Consensus range: k = 1-4 > test-cor-input.R: -------------------------------------------------------------------------------- > test-cor-input.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-cor-input.R: above the consensus to observe factor fragmentation is intentional. > test-cor-input.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-cor-input.R: 2023). PA-FA and CD are more conservative. Use the range. > test-cor-input.R: > test-cor-input.R: -- Factor / Component Count Suggestion (ackwards) ------------------------------ > test-cor-input.R: Variables: 6 > test-cor-input.R: n: 875 > test-cor-input.R: Basis: (user-supplied matrix) > test-cor-input.R: Tested k: 1-5 > test-cor-input.R: > test-cor-input.R: -- Criteria (k = 1-5) -- > test-cor-input.R: > test-cor-input.R: k = 1: PA-PC v PA-FA v MAP 0.0461* VSS-1 0.7025 VSS-2 0.0000 > test-cor-input.R: k = 2: PA-PC - PA-FA v MAP 0.1279 VSS-1 0.7919* VSS-2 0.8159 > test-cor-input.R: k = 3: PA-PC - PA-FA v MAP 0.2614 VSS-1 0.7666 VSS-2 0.8879 > test-cor-input.R: k = 4: PA-PC - PA-FA - MAP 0.4712 VSS-1 0.6796 VSS-2 0.9054* > test-cor-input.R: k = 5: PA-PC - PA-FA - MAP 1.0000 VSS-1 0.7009 VSS-2 0.8935 > test-cor-input.R: + CD skipped (requires raw data; not available for matrix input). > test-cor-input.R: > test-cor-input.R: -- Recommendations -- > test-cor-input.R: > test-cor-input.R: * PA-PC: k <= 1 > test-cor-input.R: * PA-FA: k <= 3 > test-cor-input.R: * MAP: k = 1 > test-cor-input.R: * VSS-1: k = 2 > test-comparability.R: > test-cor-input.R: * VSS-2: k = 4 > test-comparability.R: -- Split-Half Factor Comparability (ackwards) ---------------------------------- > test-cor-input.R: Consensus range: k = 1-4 > test-cor-input.R: -------------------------------------------------------------------------------- > test-cor-input.R: Note: k_max in ackwards() is a maximum depth. Setting k_max one or two levels > test-cor-input.R: above the consensus to observe factor fragmentation is intentional. > test-comparability.R: Engine: pca > test-cor-input.R: Caution: PA-PC tends to overextract; structures may not replicate (Forbes, > test-cor-input.R: 2023). PA-FA and CD are more conservative. Use the range. > test-comparability.R: Basis: pearson > test-comparability.R: n: 1,000 (500 per half) > test-comparability.R: Splits: 2 > test-comparability.R: Levels: 1-2 (requested 1-3; full-sample fit truncated) > test-comparability.R: > test-comparability.R: -- Comparability by level (median across splits) -- > test-comparability.R: > test-comparability.R: k = 1: median r 1.00, min r 1.00 (m1f1) > test-comparability.R: k = 2: median r 1.00, min r 1.00 (m2f2) > test-comparability.R: -------------------------------------------------------------------------------- > test-comparability.R: Per-factor detail (incl. Tucker's φ) in `$summary`; per-split values in > test-comparability.R: `$coefficients`. > test-comparability.R: Conventional benchmarks: >= .90 replication floor (Everett, 1983; Saucier et > test-comparability.R: al., 2005), >= .95 factors interchangeable (Lorenzo-Seva & ten Berge, 2006) -- > test-comparability.R: conventions, not tests. Interpret levels whose factors all replicate. > test-cor-input.R: i Running parallel analysis (5 iterations, PC + FA)... > test-cor-input.R: v Running parallel analysis (5 iterations, PC + FA)... [43ms] > test-cor-input.R: > test-cor-input.R: i Running MAP and VSS... > test-cor-input.R: v Running MAP and VSS... [48ms] > test-cor-input.R: > test-cor-input.R: i Running Comparison Data (CD)... > test-cor-input.R: v Running Comparison Data (CD)... [226ms] > test-cor-input.R: > test-data.R: i Running parallel analysis (5 iterations, PC + FA)... > test-data.R: v Running parallel analysis (5 iterations, PC + FA)... [49ms] > test-data.R: > test-data.R: i Running MAP and VSS... > test-data.R: v Running MAP and VSS... [40ms] > test-data.R: > test-data.R: i Running Comparison Data (CD)... > test-efa.R: > test-efa.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-efa.R: Engine: efa > test-efa.R: Rotation: varimax > test-efa.R: Basis: pearson > test-efa.R: n: 2,800 > test-efa.R: k (max): 3 > test-efa.R: > test-efa.R: -- Levels -- > test-efa.R: > test-efa.R: v k = 1: 1 factor, 17.0% variance > test-efa.R: v k = 2: 2 factors, 26.1% variance > test-efa.R: v k = 3: 3 factors, 32.1% variance > test-efa.R: > test-efa.R: -- Edges -- > test-efa.R: > test-efa.R: 5 of 8 edges have |r| >= 0.3 > test-efa.R: -------------------------------------------------------------------------------- > test-efa.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-efa.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-efa.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-efa.R: they do not validate the edges or the hierarchy itself. > test-efa.R: Error in solve.default(r) : > test-efa.R: system is computationally singular: reciprocal condition number = 5.19743e-17 > test-data.R: v Running Comparison Data (CD)... [2.4s] > test-data.R: > test-factor-labels.R: i Redundancy pruning (direct criterion, |r| >= 0.9) flagged 3 nodes. > test-factor-labels.R: i Nodes are retained in the object; inspect with `x$prune$nodes` and `x$prune$chains`. > test-factor-labels.R: i Redundancy pruning (direct criterion, |r| >= 0.9) flagged 3 nodes. > test-factor-labels.R: i Nodes are retained in the object; inspect with `x$prune$nodes` and `x$prune$chains`. > test-factorability.R: > test-factorability.R: -- Factorability screen (ackwards) --------------------------------------------- > test-factorability.R: Basis: pearson > test-factorability.R: Observations: 1,000 > test-factorability.R: Variables: 16 > test-factorability.R: N:p ratio: 62.5:1 > test-factorability.R: > test-factorability.R: -- Sampling adequacy -- > test-factorability.R: > test-factorability.R: Overall KMO: 0.86 (meritorious) > test-factorability.R: > test-factorability.R: Bartlett's test of sphericity: chi-square(120) = 6476.3, p < .001 > test-factorability.R: > test-factorability.R: -- Identifiability -- > test-factorability.R: > test-factorability.R: Ledermann bound: at most 10 common factors are identifiable from 16 variables > test-factorability.R: (EFA/ESEM; PCA is unbounded). > test-factorability.R: -------------------------------------------------------------------------------- > test-factorability.R: KMO bands (Kaiser 1974), the N:p >= 5/10 rules, and Bartlett at .05 are widely > test-factorability.R: used *rules of thumb*, not settled thresholds -- required N depends on > test-factorability.R: communalities and factor overdetermination (MacCallum et al. 1999). Read the > test-factorability.R: numbers, not a pass/fail. > test-factorability.R: > test-factorability.R: -- Factorability screen (ackwards) --------------------------------------------- > test-factorability.R: Basis: pearson > test-factorability.R: Observations: 1,000 > test-factorability.R: Variables: 16 > test-factorability.R: N:p ratio: 62.5:1 > test-factorability.R: > test-factorability.R: -- Sampling adequacy -- > test-factorability.R: > test-factorability.R: Overall KMO: 0.86 (meritorious) > test-factorability.R: > test-factorability.R: Bartlett's test of sphericity: chi-square(120) = 6476.3, p < .001 > test-factorability.R: > test-factorability.R: -- Identifiability -- > test-factorability.R: > test-factorability.R: Ledermann bound: at most 10 common factors are identifiable from 16 variables > test-factorability.R: (EFA/ESEM; PCA is unbounded). > test-factorability.R: -------------------------------------------------------------------------------- > test-factorability.R: KMO bands (Kaiser 1974), the N:p >= 5/10 rules, and Bartlett at .05 are widely > test-factorability.R: used *rules of thumb*, not settled thresholds -- required N depends on > test-factorability.R: communalities and factor overdetermination (MacCallum et al. 1999). Read the > test-factorability.R: numbers, not a pass/fail. > test-interpret.R: > test-interpret.R: -- Salient factors by item (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.25 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: x1: First indicator > test-interpret.R: m3f1 [-0.939] > test-interpret.R: m3f3 [0.279] > test-interpret.R: > test-interpret.R: x2 > test-interpret.R: m3f1 [-0.955] > test-interpret.R: > test-interpret.R: x3 > test-interpret.R: m3f1 [-0.950] > test-interpret.R: > test-interpret.R: x4 > test-interpret.R: m3f2 [0.937] > test-interpret.R: > test-interpret.R: x5 > test-interpret.R: m3f2 [0.952] > test-interpret.R: > test-interpret.R: x6 > test-interpret.R: m3f2 [0.956] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.25 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: m3f1 > test-interpret.R: x2 [-0.955] > test-interpret.R: x3 [-0.950] > test-interpret.R: x1: First indicator [-0.939] > test-interpret.R: > test-interpret.R: m3f2 > test-interpret.R: x6 [0.956] > test-interpret.R: x5 [0.952] > test-interpret.R: x4 [0.937] > test-interpret.R: > test-interpret.R: m3f3 > test-interpret.R: x1: First indicator [0.279] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.3 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 1 (1 factor) -- > test-interpret.R: > test-interpret.R: m1f1 > test-interpret.R: x4 [0.709] > test-interpret.R: x5 [0.706] > test-interpret.R: x6 [0.706] > test-interpret.R: x3 [-0.701] > test-interpret.R: x2 [-0.676] > test-interpret.R: x1 [-0.662] > test-interpret.R: > test-interpret.R: -- Level 2 (2 factors) -- > test-interpret.R: > test-interpret.R: m2f1 > test-interpret.R: x6 [0.954] > test-interpret.R: x5 [0.951] > test-interpret.R: x4 [0.946] > test-interpret.R: > test-interpret.R: m2f2 > test-interpret.R: x2 [-0.952] > test-interpret.R: x1 [-0.944] > test-interpret.R: x3 [-0.941] > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: m3f1 > test-interpret.R: x2 [-0.955] > test-interpret.R: x3 [-0.950] > test-interpret.R: x1 [-0.939] > test-interpret.R: > test-interpret.R: m3f2 > test-interpret.R: x6 [0.956] > test-interpret.R: x5 [0.952] > test-interpret.R: x4 [0.937] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.3 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 1 (1 factor) -- > test-interpret.R: > test-interpret.R: m1f1 > test-interpret.R: x4 [0.709] > test-interpret.R: x5 [0.706] > test-interpret.R: x6 [0.706] > test-interpret.R: x3 [-0.701] > test-interpret.R: x2 [-0.676] > test-interpret.R: x1 [-0.662] > test-interpret.R: > test-interpret.R: -- Level 2 (2 factors) -- > test-interpret.R: > test-interpret.R: m2f1 > test-interpret.R: x6 [0.954] > test-interpret.R: x5 [0.951] > test-interpret.R: x4 [0.946] > test-interpret.R: > test-interpret.R: m2f2 > test-interpret.R: x2 [-0.952] > test-interpret.R: x1 [-0.944] > test-interpret.R: x3 [-0.941] > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: m3f1 > test-interpret.R: x2 [-0.955] > test-interpret.R: x3 [-0.950] > test-interpret.R: x1 [-0.939] > test-interpret.R: > test-interpret.R: m3f2 > test-interpret.R: x6 [0.956] > test-interpret.R: x5 [0.952] > test-interpret.R: x4 [0.937] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.99 > test-interpret.R: Top-n: all > test-interpret.R: No items met the |loading| >= 0.99 threshold. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.3 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: m3f1 > test-interpret.R: A4: Love children [0.778] > test-interpret.R: A5: Make people feel at ease [0.735] > test-interpret.R: A3: Know how to comfort others [0.728] > test-interpret.R: A2: Inquire about others' well-being [0.562] > test-interpret.R: > test-interpret.R: m3f2 > test-interpret.R: A1: Am indifferent to the feelings of others [-0.919] > test-interpret.R: A2: Inquire about others' well-being [0.529] > test-interpret.R: A3: Know how to comfort others [0.387] > test-interpret.R: > test-interpret.R: m3f3 > test-interpret.R: C1: Am exacting in my work [0.995] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-interpret.R: > test-interpret.R: -- Salient items by factor (ackwards) ------------------------------------------ > test-interpret.R: Engine: pca > test-interpret.R: Cut: |loading| >= 0.3 > test-interpret.R: Top-n: all > test-interpret.R: > test-interpret.R: -- Level 3 (3 factors) -- > test-interpret.R: > test-interpret.R: m3f1 > test-interpret.R: A4: Love children [0.778] > test-interpret.R: A5: Make people feel at ease [0.735] > test-interpret.R: A3: Know how to comfort others [0.728] > test-interpret.R: A2: Inquire about others' well-being [0.562] > test-interpret.R: > test-interpret.R: m3f2 > test-interpret.R: A1: Am indifferent to the feelings of others [-0.919] > test-interpret.R: A2: Inquire about others' well-being [0.529] > test-interpret.R: A3: Know how to comfort others [0.387] > test-interpret.R: > test-interpret.R: m3f3 > test-interpret.R: C1: Am exacting in my work [0.995] > test-interpret.R: -------------------------------------------------------------------------------- > test-interpret.R: Loadings reflect primary-parent sign alignment. Use tidy(x, what = "loadings") > test-interpret.R: for the full matrix. > test-label_template.R: c( > test-label_template.R: "m1f1" = "m1f1", > test-label_template.R: "m2f1" = "m2f1", > test-label_template.R: "m2f2" = "m2f2" > test-label_template.R: ) > test-label_template.R: `label_template()` scaffold (id style): > test-pca.R: Error in solve.default(r) : > test-pca.R: Lapack routine dgesv: system is exactly singular: U[6,6] = 0 > test-print.R: > test-print.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-print.R: Engine: pca > test-print.R: Rotation: varimax > test-print.R: Basis: pearson > test-print.R: n: 2,800 > test-print.R: k (max): 3 > test-print.R: > test-print.R: -- Levels -- > test-print.R: > test-print.R: v k = 1: 1 factor, 20.1% variance > test-print.R: v k = 2: 2 factors, 31.1% variance > test-print.R: v k = 3: 3 factors, 39.6% variance > test-print.R: > test-print.R: -- Edges -- > test-print.R: > test-print.R: 5 of 8 edges have |r| >= 0.3 > test-print.R: -------------------------------------------------------------------------------- > test-print.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-print.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-print.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-print.R: they do not validate the edges or the hierarchy itself. > test-print.R: > test-print.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-print.R: Engine: pca > test-print.R: Rotation: varimax > test-print.R: Basis: pearson > test-print.R: n: 2,800 > test-print.R: k (max): 3 > test-print.R: > test-print.R: -- Levels -- > test-print.R: > test-print.R: v k = 1: 1 factor, 20.1% variance > test-print.R: v k = 2: 2 factors, 31.1% variance > test-prune.R: Error in solve.default(r) : > test-prune.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-print.R: v k = 3: 3 factors, 39.6% variance > test-print.R: > test-print.R: -- Edges -- > test-print.R: > test-print.R: 5 of 8 edges have |r| >= 0.3 > test-print.R: -------------------------------------------------------------------------------- > test-print.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-print.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-print.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-print.R: they do not validate the edges or the hierarchy itself. > test-print.R: > test-print.R: -- Summary: Bass-Ackwards Analysis (ackwards) ---------------------------------- > test-print.R: Engine: pca > test-print.R: Rotation: varimax > test-print.R: Basis: pearson > test-print.R: n: 2,800 > test-print.R: k (max): 3 > test-print.R: > test-print.R: -- Levels -- > test-print.R: > test-print.R: k = 1: 1 factor (30.2% cumulative variance) > test-print.R: m1f1 30.2% eigenvalue 3.02 > test-print.R: > test-print.R: k = 2: 2 factors (48.1% cumulative variance) > test-print.R: m2f1 24.5% eigenvalue 3.02 > test-print.R: m2f2 23.6% eigenvalue 1.79 > test-print.R: > test-print.R: k = 3: 3 factors (57.4% cumulative variance) > test-print.R: m3f1 24.1% eigenvalue 3.02 > test-print.R: m3f2 22.1% eigenvalue 1.79 > test-print.R: m3f3 11.2% eigenvalue 0.93 > test-print.R: > test-print.R: -- Lineage (primary parents) -- > test-print.R: > test-print.R: m1f1 > m2f1, m2f2 > test-print.R: m2f1 > m3f1 > test-print.R: m2f2 > m3f2, m3f3 > test-print.R: -------------------------------------------------------------------------------- > test-print.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-print.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-print.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-print.R: they do not validate the edges or the hierarchy itself. > test-print.R: > test-print.R: -- Summary: Bass-Ackwards Analysis (ackwards) ---------------------------------- > test-print.R: Engine: pca > test-print.R: Rotation: varimax > test-print.R: Basis: pearson > test-print.R: n: 2,800 > test-print.R: k (max): 3 > test-print.R: > test-print.R: -- Levels -- > test-print.R: > test-print.R: k = 1: 1 factor (30.2% cumulative variance) > test-print.R: m1f1 30.2% eigenvalue 3.02 > test-print.R: > test-print.R: k = 2: 2 factors (48.1% cumulative variance) > test-print.R: m2f1 24.5% eigenvalue 3.02 > test-print.R: m2f2 23.6% eigenvalue 1.79 > test-print.R: > test-print.R: k = 3: 3 factors (57.4% cumulative variance) > test-print.R: m3f1 24.1% eigenvalue 3.02 > test-print.R: m3f2 22.1% eigenvalue 1.79 > test-print.R: m3f3 11.2% eigenvalue 0.93 > test-print.R: > test-print.R: -- Lineage (primary parents) -- > test-print.R: > test-print.R: m1f1 > m2f1, m2f2 > test-print.R: m2f1 > m3f1 > test-print.R: m2f2 > m3f2, m3f3 > test-print.R: -------------------------------------------------------------------------------- > test-print.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-print.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-print.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-print.R: they do not validate the edges or the hierarchy itself. > test-prune.R: Error in solve.default(r) : > test-prune.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-prune.R: Error in solve.default(r) : > test-prune.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 500 > test-prune.R: k (max): 4 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 97.3% variance > test-prune.R: v k = 2: 2 factors, 99.8% variance > test-prune.R: v k = 3: 3 factors, 99.8% variance > test-prune.R: v k = 4: 4 factors, 99.9% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 8 of 20 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Redundancy (direct, |r| >= 0.9): 6 nodes flagged > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 500 > test-prune.R: k (max): 4 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 97.3% variance > test-prune.R: v k = 2: 2 factors, 99.8% variance > test-prune.R: v k = 3: 3 factors, 99.8% variance > test-prune.R: v k = 4: 4 factors, 99.9% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 8 of 20 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Redundancy (direct, |r| >= 0.9): 6 nodes flagged > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 1,000 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 41.8% variance > test-prune.R: v k = 2: 2 factors, 58.5% variance > test-prune.R: v k = 3: 3 factors, 72.2% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 5 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Artifact: Tucker's phi computed for 11 cross-level factor pairs > test-prune.R: Structural signals: 3 factors flagged (inspect `x$prune$structural`) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 1,000 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 41.8% variance > test-prune.R: v k = 2: 2 factors, 58.5% variance > test-prune.R: v k = 3: 3 factors, 72.2% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 5 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Artifact: Tucker's phi computed for 11 cross-level factor pairs > test-prune.R: Structural signals: 3 factors flagged (inspect `x$prune$structural`) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 500 > test-prune.R: k (max): 4 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 97.3% variance > test-prune.R: v k = 2: 2 factors, 99.8% variance > test-prune.R: v k = 3: 3 factors, 99.8% variance > test-prune.R: v k = 4: 4 factors, 99.9% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 8 of 20 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Redundancy (direct, |r| >= 0.9, phi > 0.9): 5 nodes flagged > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 500 > test-prune.R: k (max): 4 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 97.3% variance > test-prune.R: v k = 2: 2 factors, 99.8% variance > test-prune.R: v k = 3: 3 factors, 99.8% variance > test-prune.R: v k = 4: 4 factors, 99.9% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 8 of 20 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Redundancy (direct, |r| >= 0.9, phi > 0.9): 5 nodes flagged > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 150 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 20.9% variance > test-prune.R: v k = 2: 2 factors, 38.4% variance > test-prune.R: v k = 3: 3 factors, 55.5% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 6 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Artifact: Tucker's phi computed for 11 cross-level factor pairs > test-prune.R: Structural signals: 3 factors flagged (inspect `x$prune$structural`) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 150 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 20.9% variance > test-prune.R: v k = 2: 2 factors, 38.4% variance > test-prune.R: v k = 3: 3 factors, 55.5% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 6 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Artifact: Tucker's phi computed for 11 cross-level factor pairs > test-prune.R: Structural signals: 3 factors flagged (inspect `x$prune$structural`) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Summary: Bass-Ackwards Analysis (ackwards) ---------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 150 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: k = 1: 1 factor (20.9% cumulative variance) > test-prune.R: m1f1 20.9% eigenvalue 1.25 > test-prune.R: > test-prune.R: k = 2: 2 factors (38.4% cumulative variance) > test-prune.R: m2f1 20.3% eigenvalue 1.25 > test-prune.R: m2f2 18.1% eigenvalue 1.05 > test-prune.R: > test-prune.R: k = 3: 3 factors (55.5% cumulative variance) > test-prune.R: m3f1 19.5% eigenvalue 1.25 > test-prune.R: m3f2 18.4% eigenvalue 1.05 > test-prune.R: m3f3 17.6% eigenvalue 1.02 > test-prune.R: > test-prune.R: -- Lineage (primary parents) -- > test-prune.R: > test-prune.R: m1f1 > m2f1, m2f2 > test-prune.R: m2f1 > m3f1 > test-prune.R: m2f2 > m3f2, m3f3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Artifact: Tucker's phi computed for 11 cross-level pairs > test-prune.R: Structural signals: 3 factors flagged (inspect `x$prune$structural`) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object with all edges preserved. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-scores.R: Error in solve.default(r) : > test-scores.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-prune.R: i Redundancy pruning (direct criterion, |r| >= 0.9 and phi > 0.95) flagged 6 nodes. > test-prune.R: i Nodes are retained in the object; inspect with `x$prune$nodes` and `x$prune$chains`. > test-prune.R: Error in solve.default(r) : > test-prune.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-prune.R: Error in solve.default(r) : > test-prune.R: Lapack routine dgesv: system is exactly singular: U[4,4] = 0 > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 100 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 21.2% variance > test-prune.R: v k = 2: 2 factors, 40.9% variance > test-prune.R: v k = 3: 3 factors, 57.5% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 5 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Manual: 1 node explicitly flagged (m2f1) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Bass-Ackwards Analysis (ackwards) ------------------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 100 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: v k = 1: 1 factor, 21.2% variance > test-prune.R: v k = 2: 2 factors, 40.9% variance > test-prune.R: v k = 3: 3 factors, 57.5% variance > test-prune.R: > test-prune.R: -- Edges -- > test-prune.R: > test-prune.R: 5 of 8 edges have |r| >= 0.3 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Manual: 1 node explicitly flagged (m2f1) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object; all edges are preserved. Inspect with `x$prune$nodes` and > test-prune.R: `tidy(x, what = "nodes")`. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Summary: Bass-Ackwards Analysis (ackwards) ---------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 100 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: k = 1: 1 factor (21.2% cumulative variance) > test-prune.R: m1f1 21.2% eigenvalue 1.27 > test-prune.R: > test-prune.R: k = 2: 2 factors (40.9% cumulative variance) > test-prune.R: m2f1 21.1% eigenvalue 1.27 > test-prune.R: m2f2 19.7% eigenvalue 1.18 > test-prune.R: > test-prune.R: k = 3: 3 factors (57.5% cumulative variance) > test-prune.R: m3f1 19.5% eigenvalue 1.27 > test-prune.R: m3f2 19.4% eigenvalue 1.18 > test-prune.R: m3f3 18.6% eigenvalue 1.00 > test-prune.R: > test-prune.R: -- Lineage (primary parents) -- > test-prune.R: > test-prune.R: m1f1 > m2f1, m2f2 > test-prune.R: m2f1 > m3f1, m3f3 > test-prune.R: m2f2 > m3f2 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Manual: 1 node explicitly flagged (m2f1) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object with all edges preserved. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. > test-prune.R: > test-prune.R: -- Summary: Bass-Ackwards Analysis (ackwards) ---------------------------------- > test-prune.R: Engine: pca > test-prune.R: Rotation: varimax > test-prune.R: Basis: pearson > test-prune.R: n: 100 > test-prune.R: k (max): 3 > test-prune.R: > test-prune.R: -- Levels -- > test-prune.R: > test-prune.R: k = 1: 1 factor (21.2% cumulative variance) > test-prune.R: m1f1 21.2% eigenvalue 1.27 > test-prune.R: > test-prune.R: k = 2: 2 factors (40.9% cumulative variance) > test-prune.R: m2f1 21.1% eigenvalue 1.27 > test-prune.R: m2f2 19.7% eigenvalue 1.18 > test-prune.R: > test-prune.R: k = 3: 3 factors (57.5% cumulative variance) > test-prune.R: m3f1 19.5% eigenvalue 1.27 > test-prune.R: m3f2 19.4% eigenvalue 1.18 > test-prune.R: m3f3 18.6% eigenvalue 1.00 > test-prune.R: > test-prune.R: -- Lineage (primary parents) -- > test-prune.R: > test-prune.R: m1f1 > m2f1, m2f2 > test-prune.R: m2f1 > m3f1, m3f3 > test-prune.R: m2f2 > m3f2 > test-prune.R: > test-prune.R: -- Pruning -- > test-prune.R: > test-prune.R: Manual: 1 node explicitly flagged (m2f1) > test-prune.R: -------------------------------------------------------------------------------- > test-prune.R: Note: Pruning is interpretive relabeling, not re-estimation. Flagged nodes > test-prune.R: remain in the object with all edges preserved. > test-prune.R: Note: This is a series of linked solutions, not a fitted hierarchical model. > test-prune.R: Cross-level edges are descriptive score correlations. Per-level fit indices > test-prune.R: (EFA/ESEM) describe how well a k-factor model fits the items at that level -- > test-prune.R: they do not validate the edges or the hierarchy itself. [ FAIL 1 | WARN 0 | SKIP 11 | PASS 2285 ] ══ Skipped tests (11) ══════════════════════════════════════════════════════════ • NEWS.md not reachable from this test context (1): 'test-docs-no-milestone-refs.R:20:3' • On CRAN (5): 'test-print-snapshot.R:16:1', 'test-print-snapshot.R:23:1', 'test-print-snapshot.R:29:1', 'test-print-snapshot.R:38:1', 'test-print-snapshot.R:48:1' • README files not reachable from this test context (1): 'test-docs-no-milestone-refs.R:31:3' • data-raw/sim16.R not reachable from this test context (1): 'test-data.R:173:3' • inst/CITATION not reachable from this test context (1): 'test-docs-citations.R:43:3' • man/ackwards.Rd not reachable from this test context (1): 'test-docs-citations.R:21:3' • vignettes/ not reachable from this test context (1): 'test-docs-no-milestone-refs.R:42:3' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-esem.R:628:3'): ESEM results are identical across serial and parallel future plans ── <FutureInterruptError/FutureError/error/FutureCondition/condition> Error: A future ('future_lapply-2') of class MulticoreFuture was interrupted, while running on localhost (pid 57268) [future 'future_lapply-2' (b3456efe1ba60987ceeaf890a967c223-32); on b3456efe1ba60987ceeaf890a967c223@macos13-vm.local<47833> at 2026-07-24 23:06:25.307407] Backtrace: ▆ 1. ├─base::suppressMessages(...) at test-esem.R:628:3 2. │ └─base::withCallingHandlers(...) 3. ├─base::suppressWarnings(...) 4. │ └─base::withCallingHandlers(...) 5. └─ackwards::ackwards(...) 6. └─ackwards:::esem_levels(...) 7. └─ackwards:::.esem_lapply(...) 8. └─future.apply::future_lapply(X, FUN, future.seed = TRUE) 9. └─future.apply:::future_xapply(...) 10. └─base::tryCatch(...) 11. └─base (local) tryCatchList(expr, classes, parentenv, handlers) 12. └─base (local) tryCatchOne(...) 13. └─value[[3L]](cond) 14. └─future.apply:::onError(e, futures = fs, debug = debug) [ FAIL 1 | WARN 0 | SKIP 11 | PASS 2285 ] Error: ! Test failures. Execution halted Flavor: r-oldrel-macos-arm64

These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.
Health stats visible at Monitor.