Browse code

Failed attempt to clusterize the diagram using dot.

Xavier G authored on23/10/2016 23:32:43
Showing1 changed files

... ...
@@ -1,74 +1,118 @@
1 1
 /* Natural philosophy is the genius that has regulated my fate. */
2 2
 digraph characters {
3
-	agatha [label="Agatha"];
4
-	beaufort_father [label="Beaufort\n(ruined merchant)"];
5
-	caroline [label="Caroline Beaufort"];
6
-	clerval_father [label="Clerval,\nsome Geneva merchant"];
7
-	elizabeth [label="Elizabeth Lavenza"]
8
-	ernest [label="Ernest"]
9
-	felix [label="Felix"];
10
-	felix_father [label="M. De Lacy"];
11
-	frankenstein [label="Victor Frankenstein", shape="box"];
12
-	frankenstein_aunt [label="Frankenstein's aunt\n(deceased)"]
13
-	frankenstein_creature [label="Frankenstein's creature"]
14
-	frankenstein_father [label="Alphonse Frankenstein"];
15
-	henry_clerval [label="Henry Clerval"];
16
-	justine_moritz [label="Justine Moritz"];
17
-	margaret_saville [label="Mrs Margaret Saville"];
18
-	moritz_father [label="M. Moritz\n(deceased)"];
19
-	moritz_mother [label="Madame Moritz"];
3
+	rankdir="TB";
4
+	overlap=voronoi;
5
+	concentrate="true";
6
+
7
+	{
8
+		safie_father [label="Turkish merchant"];
9
+		subgraph cluster_cottagers {
10
+			label="Cottagers";
11
+			labelloc="b";
12
+			node [group="cottagers"];
13
+			agatha [label="Agatha"];
14
+			felix [label="Felix"];
15
+			felix_father [label="M. De Lacy"];
16
+			safie [label="Safie\n(Turkish maid)"];
17
+		}
18
+	}
19
+
20
+	subgraph cluster_ingolstadt {
21
+		label="Ingolstadt professors";
22
+		labelloc="b";
23
+		node [group="ingolstadt_characters"];
24
+		krempe [label="Professor Krempe"]
25
+		waldman [label="M. Waldman"]
26
+	}
27
+
28
+	subgraph cluster_frankenstein {
29
+		label="Frankenstein family";
30
+		labelloc="b";
31
+		node [group="frankenstein_family"];
32
+		beaufort_father [label="Beaufort\n(ruined merchant)"];
33
+		{
34
+			rank="same";
35
+			frankenstein_aunt [label="Frankenstein's aunt\n(deceased)"]
36
+			frankenstein_father [label="Alphonse Frankenstein"];
37
+			caroline [label="Caroline Beaufort"];
38
+			lavenza_father [label="Lavenza,\nan Italian gentleman\n(remarried)"]
39
+		}
40
+		{
41
+			rank="same";
42
+			ernest [label="Ernest"]
43
+			william [label="William"]
44
+			frankenstein [label="Victor Frankenstein", shape="box"];
45
+			elizabeth [label="Elizabeth Lavenza"]
46
+		}
47
+		frankenstein -> caroline [label="son of", weight="8", fontcolor="#008000", color="#008000"];
48
+		frankenstein -> frankenstein_father [label="son of", weight="8", fontcolor="#008000", color="#008000"];
49
+		frankenstein -> ernest [label="elder brother of", fontcolor="#008000", color="#008000"];
50
+		frankenstein -> william [label="elder brother of", fontcolor="#008000", color="#008000"];
51
+		frankenstein -> elizabeth [label="cousin of", fontcolor="#008000", color="#008000"];
52
+		frankenstein -> elizabeth [label="married"];
53
+	}
54
+	frankenstein_creature [label="Frankenstein's creature"];
55
+
56
+	subgraph cluster_walton {
57
+		label="Walton family";
58
+		labelloc="b";
59
+		margaret_saville [label="Mrs Margaret Saville"];
60
+		robert_walton [label="Robert Walton\n(navigator)"]
61
+		robert_walton -> margaret_saville [label="brother of", weight="135", fontcolor="#008000", color="#008000"];
62
+		robert_walton -> margaret_saville [label="reported the whole story to"];
63
+	}
64
+
65
+	subgraph cluster_moritz {
66
+		label="Moritz family";
67
+		labelloc="b";
68
+		moritz_father [label="M. Moritz\n(deceased)"];
69
+		moritz_mother [label="Madame Moritz"];
70
+		justine_moritz [label="Justine Moritz"];
71
+	}
72
+
73
+	subgraph cluster_clerval {
74
+		label="Clerval family";
75
+		labelloc="b";
76
+		henry_clerval [label="Henry Clerval"];
77
+		clerval_father [label="Clerval,\nsome Geneva merchant"];
78
+	}
20 79
 	kirwin [label="Mr Kirwin\n(magistrate)"];
21
-	krempe [label="Professor Krempe"]
22
-	lavenza_father [label="Lavenza,\nan Italian gentleman\n(remarried)"]
23
-	robert_walton [label="Robert Walton\n(navigator)"]
24
-	safie [label="Safie\n(Turkish maid)"];
25
-	safie_father [label="Turkish merchant"];
26
-	waldman [label="M. Waldman"]
27
-	william [label="William"]
28 80
 
29
-	felix -> felix_father [label="son of"];
81
+	felix -> felix_father [label="son of", fontcolor="#008000", color="#008000"];
30 82
 	felix -> safie_father [label="delivered"];
31 83
 	felix -> frankenstein_creature [label="rejected (beat)"];
32 84
 	safie -> felix [label="is promised to"];
33
-	safie -> safie_father [label="daughter of"];
85
+	safie -> safie_father [label="daughter of", fontcolor="#008000", color="#008000"];
34 86
 	safie_father -> felix [label="betrayed"];
35
-	agatha -> felix_father [label="daughter of"];
87
+	agatha -> felix_father [label="daughter of", fontcolor="#008000", color="#008000"];
36 88
 	kirwin -> frankenstein [label="arranged the defence of"];
37 89
 	kirwin -> frankenstein_father [label="informed and invited"];
38
-	caroline -> beaufort_father [label="daughter of"];
90
+	caroline -> beaufort_father [label="daughter of", fontcolor="#008000", color="#008000"];
39 91
 	caroline -> justine_moritz [label="housed and employed as servant"];
40
-	elizabeth -> frankenstein_aunt [label="daughter of"];
41
-	elizabeth -> lavenza_father [label="daughter of"];
42
-	frankenstein -> caroline [label="son of"];
43
-	frankenstein -> frankenstein_father [label="son of"];
44
-	frankenstein -> ernest [label="elder brother of"];
45
-	frankenstein -> william [label="elder brother of"];
46
-	frankenstein -> elizabeth [label="cousin of"];
47
-	frankenstein -> elizabeth [label="married"];
48
-	frankenstein -> henry_clerval [label="friend of"];
49
-	frankenstein -> waldman [label="pupil of"];
50
-	frankenstein -> krempe [label="(reluctant) pupil of"];
92
+	elizabeth -> frankenstein_aunt [label="daughter of", fontcolor="#008000", color="#008000"];
93
+	elizabeth -> lavenza_father [label="daughter of", fontcolor="#008000", color="#008000"];
94
+	frankenstein -> henry_clerval [label="friend of", fontcolor="#008000", color="#008000"];
95
+	frankenstein -> waldman [label="pupil of", fontcolor="#008000", color="#008000"];
96
+	frankenstein -> krempe [label="(reluctant) pupil of", fontcolor="#008000", color="#008000"];
51 97
 	frankenstein -> frankenstein_creature [label="gave life to"];
52 98
 	frankenstein -> frankenstein_creature [label="pursued"];
53 99
 	frankenstein -> frankenstein_father [label="reports the death of Elizabeth to"];
54
-	henry_clerval -> clerval_father [label="son of"];
55
-	robert_walton -> margaret_saville [label="brother of"];
56
-	robert_walton -> margaret_saville [label="reported the whole story to"];
100
+	henry_clerval -> clerval_father [label="son of", fontcolor="#008000", color="#008000"];
57 101
 	robert_walton -> frankenstein [label="rescued"];
58
-	robert_walton -> frankenstein_creature [label="last saw"];
59
-	justine_moritz -> moritz_mother [label="third daughter of"];
60
-	justine_moritz -> moritz_father [label="third daughter of"];
102
+	justine_moritz -> moritz_mother [label="third daughter of", fontcolor="#008000", color="#008000"];
103
+	justine_moritz -> moritz_father [label="third daughter of", fontcolor="#008000", color="#008000"];
61 104
 	justine_moritz -> william [label="was accused of having murdered"];
62
-	frankenstein_father -> frankenstein_aunt [label="brother of"];
63
-	frankenstein_father -> beaufort_father [label="friend of"];
64
-	frankenstein_father -> caroline [label="husband of"];
65
-	frankenstein_father -> clerval_father [label="friend of"];
66
-	frankenstein_creature -> william [label="murdered"];
105
+	frankenstein_father -> frankenstein_aunt [label="brother of", fontcolor="#008000", color="#008000"];
106
+	frankenstein_father -> beaufort_father [label="friend of", fontcolor="#008000", color="#008000"];
107
+	frankenstein_father -> caroline [label="husband of", fontcolor="#008000", color="#008000"];
108
+	frankenstein_father -> clerval_father [label="friend of", fontcolor="#008000", color="#008000"];
109
+	frankenstein_creature -> william [label="murdered", fontcolor="#cc0000", color="#cc0000"];
67 110
 	frankenstein_creature -> { felix; agatha; felix_father; safie } [label="spied"];
68 111
 	frankenstein_creature -> frankenstein [label="demanded a female\ncompanion to"];
69
-	frankenstein_creature -> justine_moritz [label="placed William's portrait\nof Elizabeth in ~'s dress"];
70
-	frankenstein_creature -> henry_clerval [label="murdered"];
71
-	frankenstein_creature -> elizabeth [label="murdered"];
112
+	frankenstein_creature -> justine_moritz [label="placed William's portrait\nof Elizabeth in ~'s dress", fontcolor="#cc0000", color="#cc0000"];
113
+	frankenstein_creature -> henry_clerval [label="murdered", fontcolor="#cc0000", color="#cc0000"];
114
+	frankenstein_creature -> elizabeth [label="murdered", fontcolor="#cc0000", color="#cc0000"];
72 115
 	frankenstein_creature -> robert_walton [label="confided his intent to die to"];
116
+	robert_walton -> frankenstein_creature [label="last saw"];
73 117
 	{ agatha; safie } -> frankenstein_creature [label="rejected (fled)"];
74 118
 }