format-loadings.md
In EFAtools: Fast and Flexible Implementations of Exploratory Factor Analysis Tools

format.efa_loadings aligns decimals and renders a plain table

Code
  print(make_loadings())
Output
                F1     F2     F3
  fun          .820  -.110   .050
  friends_lo   .450   .600  -.020
  enjoy       -.300   .710   .123
  hurt         .040  -.050  1.080

format.efa_loadings prints communalities

Code
  print(make_loadings(), h2 = h2, legend = TRUE)
Output
                F1     F2     F3     h2     u2
  fun          .820  -.110   .050   .700   .300
  friends_lo   .450   .600  -.020   .580   .420
  enjoy       -.300   .710   .123   .630   .370
  hurt         .040  -.050  1.080  1.180  -.180

format.efa_loadings sorts rows when requested

Code
  print(make_loadings(), sort_loadings = "clustered")
Output
                F1     F2     F3
  fun          .820  -.110   .050
  enjoy       -.300   .710   .123
  friends_lo   .450   .600  -.020
  hurt         .040  -.050  1.080

wide matrices wrap into stacked blocks via max_factors_per_block

Code
  print(make_wide_loadings(), max_factors_per_block = 3)
Output
  Factors F1-F3 (block 1/3)
        F1     F2     F3
  v1  -.900  -.670  -.440
  v2  -.840  -.610  -.380
  v3  -.780  -.550  -.320
  v4  -.730  -.490  -.260

  Factors F4-F6 (block 2/3)
        F4    F5    F6
  v1  -.200  .030  .260
  v2  -.150  .090  .320
  v3  -.090  .150  .380
  v4  -.030  .200  .440

  Factors F7-F8 (block 3/3)
       F7    F8
  v1  .490  .730
  v2  .550  .780
  v3  .610  .840
  v4  .670  .900

wide matrices wrap into stacked blocks on a narrow console

Code
  print(make_wide_loadings())
Output
  Factors F1-F5 (block 1/2)
        F1     F2     F3     F4    F5
  v1  -.900  -.670  -.440  -.200  .030
  v2  -.840  -.610  -.380  -.150  .090
  v3  -.780  -.550  -.320  -.090  .150
  v4  -.730  -.490  -.260  -.030  .200

  Factors F6-F8 (block 2/2)
       F6    F7    F8
  v1  .260  .490  .730
  v2  .320  .550  .780
  v3  .380  .610  .840
  v4  .440  .670  .900

wide non-loading tables wrap into stacked blocks

Code
  writeLines(.efa_corr_lines(make_wide_vars()))
Output
  Factors F1-F9 (block 1/2)
                 F1     F2     F3     F4     F5     F6     F7     F8     F9
  SS loadings  3.500  3.218  2.936  2.655  2.373  2.091  1.809  1.527  1.245
  Prop Var      .300   .275   .249   .224   .198   .173   .147   .122   .096
  Cum Var       .300   .575   .824  1.047  1.245  1.418  1.565  1.687  1.784

  Factors F10-F12 (block 2/2)
                F10    F11    F12
  SS loadings   .964   .682   .400
  Prop Var      .071   .045   .020
  Cum Var      1.855  1.900  1.920

Code
  writeLines(.efa_corr_lines(make_wide_phi(), lower_only = TRUE))
Output
  Factors F1-F11 (block 1/2)
         F1     F2     F3     F4     F5     F6     F7     F8     F9    F10    F11
  F1   1.000
  F2    .100  1.000
  F3    .108   .193  1.000
  F4    .117   .202   .278  1.000
  F5    .125   .210   .286   .354  1.000
  F6    .134   .218   .295   .362   .422  1.000
  F7    .142   .227   .303   .371   .430   .481  1.000
  F8    .151   .235   .312   .379   .438   .489   .532  1.000
  F9    .159   .244   .320   .388   .447   .498   .540   .574  1.000
  F10   .168   .252   .328   .396   .455   .506   .548   .582   .608  1.000
  F11   .176   .261   .337   .405   .464   .515   .557   .591   .616   .633  1.000
  F12   .185   .269   .345   .413   .472   .523   .565   .599   .625   .642   .650

  Factors F12 (block 2/2)
        F12
  F12  1.000

format.efa_sl_loadings flags a Heywood case

Code
  print(make_sl(heywood = TRUE))
Output
        g     F1     F2     h2     u2
  i1  .700   .200   .100   .530   .470
  i2  .650  1.050  -.050  1.100  -.100
  i3  .400   .100   .550   .460   .540

  ! Results contain a Heywood case!

format.efa_sl_loadings prints cleanly without Heywood cases

Code
  print(make_sl(heywood = FALSE))
Output
        g    F1     F2    h2    u2
  i1  .700  .200   .100  .530  .470
  i2  .650  .620  -.050  .700  .300
  i3  .400  .100   .550  .460  .540