Attachment 'plot_O-C.gp.txt'
Download 1 set encoding iso_8859_1
2 set xla 'Air wavelength [Å]'
3 set yla 'Wavelength difference O-C [Å]'
4 set term post eps enh color solid 20
5 #
6 # gamma prime
7 #
8 unset label
9 set label 99 "O-C wavelength differences for TiO {/Symbol g \242} system\nO: Davis et al. 1986 (from Plez)\nC: Plez 2008" at graph 0.03,0.95 front
10 set key right
11 #set xra [5800:7000]
12 #set yra [-6:2]
13 #
14 set output 'O-C-H.ps'
15 set label '0-0' at 6250, 0.2 front
16 set label '1-0' at 5900, 0.3 front
17 set label '0-1' at 6620, 0.4 front
18 set label '1' at 5820, 0.10 front
19 set label '1' at 6130, 0.10 front
20 set label '1' at 6530, 0.20 front
21 set label '1' at 6050,-1.20 front
22 set label '1' at 6430,-2.50 front
23 set label '1' at 6900,-4.00 front
24 set label '2' at 5880,-0.07 front
25 set label '2' at 6190,-0.07 front
26 set label '2' at 6600,-0.07 front
27 set label '3' at 6050,-0.50 front
28 set label '3' at 6420,-1.10 front
29 set label '3' at 6780,-1.00 front
30 set label '3' at 6050,-2.50 front
31 set label '3' at 6400,-5.00 front
32 set label '3' at 6770,-5.00 front
33 plot \
34 "< awk '$7==\"H\" && $6~\"P\" && ($2==0 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.5, \
35 "< awk '$7==\"H\" && $6~\"Q\" && ($2==0 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.5, \
36 "< awk '$7==\"H\" && $6~\"R\" && ($2==0 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.5, \
37 "< awk '$7==\"H\" && $6~\"P\" && ($2==1 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 7 ps 0.5, \
38 "< awk '$7==\"H\" && $6~\"Q\" && ($2==1 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 1 ps 0.5, \
39 "< awk '$7==\"H\" && $6~\"R\" && ($2==1 && $3==0)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 3 ps 0.5, \
40 "< awk '$7==\"H\" && $6~\"P\" && ($2==0 && $3==1)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 7 ps 0.5, \
41 "< awk '$7==\"H\" && $6~\"Q\" && ($2==0 && $3==1)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 1 ps 0.5, \
42 "< awk '$7==\"H\" && $6~\"R\" && ($2==0 && $3==1)' TiO-Phillips-O-C.dat" u 8:9 t '' w p pt 7 lt 3 ps 0.5
43 #
44 # gamma
45 #
46 unset label
47 set label 99 "O-C wavelength differences for TiO {/Symbol g} system\nO: Davis et al. 1986 (from Plez)\nC: Plez 2008" at graph 0.03,0.15 front
48 set key left
49 set xra [6250:8800]
50 set yra [-0.7:0.7]
51 #
52 set output 'O-C-G0.ps'
53 set label 1 '5-3' at 6500,-0.2 front
54 set label 2 '0-0' at 7000,-0.2 front
55 set label 3 '0-1' at 7600,-0.2 front
56 set label 4 '0-2' at 8100,-0.2 front
57 set label 11 '1' at 7050,-0.13 front
58 set label 12 '2' at 7000,-0.05 front
59 set label 13 '3' at 6950, 0.05 front
60 set label 21 '1' at 7500, 0.50 front
61 set label 22 '2' at 7500, 0.18 front
62 set label 23 '3' at 7450,-0.23 front
63 plot \
64 "< awk '$7==\"G\" && $6~\"P\" && ($2==0 || $2==5)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.3, \
65 "< awk '$7==\"G\" && $6~\"Q\" && ($2==0 || $2==5)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.3, \
66 "< awk '$7==\"G\" && $6~\"R\" && ($2==0 || $2==5)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.3
67 #
68 set output 'O-C-G1.ps'
69 set label 1 '1-0' at 6600,-0.15 front
70 set label 2 '1-1' at 7100,-0.15 front
71 set label 3 '1-2' at 7600,-0.15 front
72 set label 4 '1-3' at 8200,-0.15 front
73 set label 11 '1' at 7150,-0.10 front
74 set label 12 '2' at 7100,-0.02 front
75 set label 13 '3' at 7050, 0.07 front
76 set label 21 '1' at 7600, 0.50 front
77 set label 22 '2' at 7580, 0.18 front
78 set label 23 '3' at 7450,-0.35 front
79 plot \
80 "< awk '$7==\"G\" && $6~\"P\" && ($2==1)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.3, \
81 "< awk '$7==\"G\" && $6~\"Q\" && ($2==1)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.3, \
82 "< awk '$7==\"G\" && $6~\"R\" && ($2==1)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.3
83 #
84 set output 'O-C-G2.ps'
85 set label 1 '2-0' at 6400,-0.15 front
86 set label 2 '2-1' at 6700,-0.15 front
87 set label 3 '2-3' at 7600,-0.15 front
88 set label 4 '2-4' at 8250,-0.15 front
89 unset label 11
90 unset label 12
91 unset label 13
92 unset label 21
93 unset label 22
94 unset label 23
95 plot \
96 "< awk '$7==\"G\" && $6~\"P\" && ($2==2)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.3, \
97 "< awk '$7==\"G\" && $6~\"Q\" && ($2==2)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.3, \
98 "< awk '$7==\"G\" && $6~\"R\" && ($2==2)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.3
99 #
100 set output 'O-C-G3.ps'
101 set label 1 '3-1' at 6400,-0.20 front
102 set label 2 '3-2' at 6750,-0.20 front
103 set label 3 '3-4' at 7700,-0.20 front
104 set label 4 '3-5' at 8350,-0.20 front
105 plot \
106 "< awk '$7==\"G\" && $6~\"P\" && ($2==3)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.3, \
107 "< awk '$7==\"G\" && $6~\"Q\" && ($2==3)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.3, \
108 "< awk '$7==\"G\" && $6~\"R\" && ($2==3)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.3
109 #
110 set output 'O-C-G4.ps'
111 set label 1 '4-2' at 6400,-0.25 front
112 set label 2 '4-3' at 6800,-0.25 front
113 set label 3 '4-5' at 7800,-0.25 front
114 unset label 4
115 plot \
116 "< awk '$7==\"G\" && $6~\"P\" && ($2==4)' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.3, \
117 "< awk '$7==\"G\" && $6~\"Q\" && ($2==4)' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.3, \
118 "< awk '$7==\"G\" && $6~\"R\" && ($2==4)' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.3
119 #
120 # beta
121 #
122 set output 'O-C-B.ps'
123 unset label
124 set label "O-C wavelength differences for TiO {/Symbol b} system\nO: Davis et al. 1986 (from Plez)\nC: Plez 2008" at graph 0.03,0.95
125 set key bottom
126 set xra [5580:5740]
127 set yra [-2:2]
128 set label '0-0' at 5595,-0.2 front
129 set label '1-1' at 5625,-0.7 front
130 set label '2-2' at 5660,-1.2 front
131 plot \
132 "< awk '$7==\"B\" && $6==\"P\"' TiO-Phillips-O-C.dat" u 8:9 t 'P' w p pt 7 lt 7 ps 0.5, \
133 "< awk '$7==\"B\" && $6==\"Q\"' TiO-Phillips-O-C.dat" u 8:9 t 'Q' w p pt 7 lt 1 ps 0.5, \
134 "< awk '$7==\"B\" && $6==\"R\"' TiO-Phillips-O-C.dat" u 8:9 t 'R' w p pt 7 lt 3 ps 0.5
135 #
136 # alpha
137 #
138 set output 'O-C-A.ps'
139 unset label
140 # title
141 set label "O-C wavelength differences for TiO {/Symbol a} system\nO: Davis et al. 1986 (from Plez and Kurucz)\nC: Plez 2008" at graph 0.30,0.95
142 #set key horizontal samplen -2 graph 0.95,0.75
143 unset key
144 # key
145 set label 'P1' tc lt 7 point pt 7 lt 7 offset 1,-0.3 at graph 0.30,0.75
146 set label 'P2' tc lt 3 point pt 7 lt 3 offset 1,-0.3 at graph 0.40,0.75
147 set label 'P3' tc lt 9 point pt 7 lt 9 offset 1,-0.3 at graph 0.50,0.75
148 set label 'R1' tc lt 1 point pt 7 lt 1 offset 1,-0.3 at graph 0.60,0.75
149 set label 'R2' tc lt 5 point pt 7 lt 5 offset 1,-0.3 at graph 0.70,0.75
150 set label 'R3' tc lt 8 point pt 7 lt 8 offset 1,-0.3 at graph 0.80,0.75
151 set xra [4350:6400]
152 #set xra [4460:4600]
153 set yra [-3.0:4.0]
154 #set yra [-1.0:1.0]
155 # Deltav=-3
156 set label '0-3' at 6100,-0.7 front
157 # Deltav=-2
158 set label '0-2' at 5750,-0.5 front
159 set label '1-3' at 5800,-0.7 front
160 set label '2-4' at 5850, 0.8 front
161 set label '3-5' at 5900, 0.6 front
162 # Deltav=-1
163 set label '0-1' at 5450,-0.5 front
164 set label '1-2' at 5500,-0.7 front
165 set label '2-3' at 5550, 0.7 front
166 # Deltav=0
167 set label '0-0' at 5150, 0.2 front
168 # Deltav=1
169 set label '1-0' at 4950,-0.5 front
170 set label '2-1' at 5000, 0.6 front
171 # Deltav=2
172 set label '2-0' at 4750, 0.5 front
173 set label '3-1' at 4800, 0.3 front
174 set label '4-2' at 4850, 0.1 front
175 # Deltav=3
176 set label '3-0' at 4580, 0.7 front
177 set label '4-1' at 4590, 0.45 front
178 set label '5-2' at 4600, 0.2 front
179 set label '6-3' at 4710, 2.0 front
180 # Deltav=4
181 set label '4-0' at 4390, 0.60 front
182 set label '5-1' at 4400, 0.30 front
183 set label '6-2' at 4480, 2.1 front
184 set label '7-3' at 4540, 1.8 front
185 #
186 plot \
187 "< awk '$7==\"A\" && $6==\"P1\"' TiO-Phillips-O-C.dat" u 8:9 t 'P1' w p pt 7 lt 7 ps 0.3, \
188 "< awk '$7==\"A\" && $6==\"P2\"' TiO-Phillips-O-C.dat" u 8:9 t 'P2' w p pt 7 lt 3 ps 0.3, \
189 "< awk '$7==\"A\" && $6==\"P3\"' TiO-Phillips-O-C.dat" u 8:9 t 'P3' w p pt 7 lt 9 ps 0.3, \
190 "< awk '$7==\"A\" && $6==\"R1\"' TiO-Phillips-O-C.dat" u 8:9 t 'R1' w p pt 7 lt 1 ps 0.3, \
191 "< awk '$7==\"A\" && $6==\"R2\"' TiO-Phillips-O-C.dat" u 8:9 t 'R2' w p pt 7 lt 5 ps 0.3, \
192 "< awk '$7==\"A\" && $6==\"R3\"' TiO-Phillips-O-C.dat" u 8:9 t 'R3' w p pt 7 lt 8 ps 0.3
193 #quit
194 #
195 # all systems
196 #
197 set output 'O-C-all.ps'
198 unset label
199 # title
200 set label "O-C wavelength differences for TiO\nO: Davis et al. 1986 (from Plez and Kurucz)\nC: Plez 2008" at graph 0.30,0.95
201 #set key bottom
202 unset key
203 # key
204 set label '{/Symbol a}' tc lt 1 point pt 7 lt 1 offset 1,-0.3 at graph 0.80,0.40
205 set label '{/Symbol b}' tc lt 3 point pt 7 lt 3 offset 1,-0.3 at graph 0.80,0.30
206 set label '{/Symbol g}' tc lt 7 point pt 7 lt 7 offset 1,-0.3 at graph 0.80,0.20
207 set label '{/Symbol g \242}' tc lt 9 point pt 7 lt 9 offset 1,-0.3 at graph 0.80,0.10
208 set xra [4300:9000]
209 set yra [-5.0:4.0]
210 plot \
211 "< awk '$7==\"A\"' TiO-Phillips-O-C.dat" u 8:9 t '{/Symbol a}' w p pt 7 lt 1 ps 0.3, \
212 "< awk '$7==\"B\"' TiO-Phillips-O-C.dat" u 8:9 t '{/Symbol b}' w p pt 7 lt 3 ps 0.3, \
213 "< awk '$7==\"G\"' TiO-Phillips-O-C.dat" u 8:9 t '{/Symbol g}' w p pt 7 lt 7 ps 0.3, \
214 "< awk '$7==\"H\"' TiO-Phillips-O-C.dat" u 8:9 t '{/Symbol g \242}' w p pt 7 lt 9 ps 0.3
215
216 # && ($2==4 && $3==2) && $3==0 || $2==5
217 # && ($2==4 && $3==2) && $3==0 || $2==5
218 # && ($2==4 && $3==2) && $3==0 || $2==5
219 # && ($2==4 && $3==2)
220 # && ($2==4 && $3==2)
221 # && ($2==4 && $3==2)
222 quit
Attached Files
To refer to attachments on a page, use attachment:filename, as shown below in the list of files. Do NOT use the URL of the [get] link, since this is subject to change and can break easily.You are not allowed to attach a file to this page.