From b771279816147afdcd5ea1e311792cc1fd062c4e Mon Sep 17 00:00:00 2001
From: skolenik <skolenik@gmail.com>
Date: Thu, 29 Mar 2018 08:22:36 -0500
Subject: [PATCH] Create HSCFA.gv

Holzinger and Swineford data and confirmatory factor analysis model is one of the favorite toy data sets in confirmatory factor analysis popularized by Joreskog (1969). The data set itself is available at http://www.coe.tamu.edu/~rcapraro/Graduate_Courses/EDCI%20627/Data%20Sets/Holzinger%20data.doc, as well as in R `library(MBESS)`.
---
 app/gallery/HSCFA.gv | 49 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 49 insertions(+)
 create mode 100644 app/gallery/HSCFA.gv

diff --git a/app/gallery/HSCFA.gv b/app/gallery/HSCFA.gv
new file mode 100644
index 0000000..09600f6
--- /dev/null
+++ b/app/gallery/HSCFA.gv
@@ -0,0 +1,49 @@
+digraph HSCFA {
+
+   vis -> x1 [weight=1000];
+   vis -> x2 [weight=1000];
+   vis -> x3 [weight=1000];
+   text -> x4 [weight=1000];
+   text -> x5 [weight=1000];
+   text -> x6 [weight=1000];
+   math -> x7 [weight=1000];
+   math -> x8 [weight=1000];
+   math -> x9 [weight=1000];
+   vis -> math [dir=both];
+   vis -> text [dir=both];
+   text -> math [dir=both];
+
+   x1 [shape=box,group="obsvar"];
+   x2 [shape=box,group="obsvar"];
+   x3 [shape=box,group="obsvar"];
+   x4 [shape=box,group="obsvar"];
+   x5 [shape=box,group="obsvar"];
+   x6 [shape=box,group="obsvar"];
+   x7 [shape=box,group="obsvar"];
+   x8 [shape=box,group="obsvar"];
+   x9 [shape=box,group="obsvar"];
+
+   { rank = same; x1; x2; x3; x4; x5; x6; x7; x8; x9 }
+   { rank = same; vis; math; }
+   { rank = max; d1; d2; d3; d4; d5; d6; d7; d8; d9 }
+
+   d1 -> x1;
+   d1 [shape=plaintext,label=""];
+   d2 -> x2;
+   d2 [shape=plaintext,label=""];
+   d3 -> x3;
+   d3 [shape=plaintext,label=""];
+   d4 -> x4;
+   d4 [shape=plaintext,label=""];
+   d5 -> x5;
+   d5 [shape=plaintext,label=""];
+   d6 -> x6;
+   d6 [shape=plaintext,label=""];
+   d7 -> x7;
+   d7 [shape=plaintext,label=""];
+   d8 -> x8;
+   d8 [shape=plaintext,label=""];
+   d9 -> x9;
+   d9 [shape=plaintext,label=""];
+
+}