1 | (* Content-type: application/vnd.wolfram.mathematica *) |
---|
2 | |
---|
3 | (*** Wolfram Notebook File ***) |
---|
4 | (* http://www.wolfram.com/nb *) |
---|
5 | |
---|
6 | (* CreatedBy='Mathematica 8.0' *) |
---|
7 | |
---|
8 | (*CacheID: 234*) |
---|
9 | (* Internal cache information: |
---|
10 | NotebookFileLineBreakTest |
---|
11 | NotebookFileLineBreakTest |
---|
12 | NotebookDataPosition[ 157, 7] |
---|
13 | NotebookDataLength[ 42218, 1151] |
---|
14 | NotebookOptionsPosition[ 37582, 986] |
---|
15 | NotebookOutlinePosition[ 38003, 1002] |
---|
16 | CellTagsIndexPosition[ 37960, 999] |
---|
17 | WindowFrame->Normal*) |
---|
18 | |
---|
19 | (* Beginning of Notebook Content *) |
---|
20 | Notebook[{ |
---|
21 | |
---|
22 | Cell[CellGroupData[{ |
---|
23 | Cell[BoxData[ |
---|
24 | RowBox[{"SetDirectory", "[", |
---|
25 | "\"\<E:\\\\Presentations\\\\BAO\\\\Amas 21cm\\\\Abell2440\>\"", |
---|
26 | "]"}]], "Input", |
---|
27 | CellChangeTimes->{{3.510485086467894*^9, 3.510485118692116*^9}}], |
---|
28 | |
---|
29 | Cell[BoxData["\<\"E:\\\\Presentations\\\\BAO\\\\Amas 21cm\\\\Abell2440\"\>"], \ |
---|
30 | "Output", |
---|
31 | CellChangeTimes->{3.5105689779304667`*^9, 3.5105690348801613`*^9, |
---|
32 | 3.511064938384456*^9, 3.5110657060580034`*^9}] |
---|
33 | }, Open ]], |
---|
34 | |
---|
35 | Cell[CellGroupData[{ |
---|
36 | |
---|
37 | Cell[TextData[StyleBox["Debut et fin des plateaux de DAB", "Section"]], \ |
---|
38 | "Section", |
---|
39 | CellChangeTimes->{{3.511065442593546*^9, 3.511065494257103*^9}, |
---|
40 | 3.5110655637914*^9}], |
---|
41 | |
---|
42 | Cell[BoxData[ |
---|
43 | RowBox[{ |
---|
44 | RowBox[{"lower1", " ", "=", " ", "21"}], ";"}]], "Input", |
---|
45 | CellChangeTimes->{{3.5105688470383787`*^9, 3.510568855485224*^9}}], |
---|
46 | |
---|
47 | Cell[BoxData[ |
---|
48 | RowBox[{ |
---|
49 | RowBox[{"upper1", " ", "=", " ", "35"}], ";"}]], "Input", |
---|
50 | CellChangeTimes->{{3.510568859069582*^9, 3.51056886365204*^9}}], |
---|
51 | |
---|
52 | Cell[BoxData[ |
---|
53 | RowBox[{ |
---|
54 | RowBox[{"lower2", " ", "=", " ", "38"}], ";"}]], "Input", |
---|
55 | CellChangeTimes->{{3.5105688666353383`*^9, 3.510568880539729*^9}}], |
---|
56 | |
---|
57 | Cell[BoxData[ |
---|
58 | RowBox[{ |
---|
59 | RowBox[{"upper2", "=", "51"}], ";"}]], "Input", |
---|
60 | CellChangeTimes->{{3.5105688824399185`*^9, 3.510568887863461*^9}}] |
---|
61 | }, Open ]], |
---|
62 | |
---|
63 | Cell[CellGroupData[{ |
---|
64 | |
---|
65 | Cell[TextData[StyleBox["Calibration 1280 MHZ", "Section"]], "Section", |
---|
66 | CellChangeTimes->{{3.5110655004498663`*^9, 3.5110655155652*^9}, |
---|
67 | 3.5110655553679943`*^9, 3.5110655958003426`*^9}], |
---|
68 | |
---|
69 | Cell[BoxData[ |
---|
70 | RowBox[{ |
---|
71 | RowBox[{"calv0", "=", " ", |
---|
72 | RowBox[{"Flatten", "[", |
---|
73 | RowBox[{"Drop", "[", |
---|
74 | RowBox[{ |
---|
75 | RowBox[{"Import", "[", |
---|
76 | RowBox[{"\"\<calibv01280.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
77 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
78 | CellChangeTimes->{{3.510485126860933*^9, 3.5104851547187185`*^9}, { |
---|
79 | 3.510485210853331*^9, 3.5104852183190775`*^9}, {3.510568257000381*^9, |
---|
80 | 3.510568276243305*^9}, {3.5105683234930296`*^9, 3.5105683261923*^9}, { |
---|
81 | 3.5105683755972395`*^9, 3.510568377628443*^9}, {3.5105689538710613`*^9, |
---|
82 | 3.510568956222296*^9}, {3.510569023660039*^9, 3.5105690240910826`*^9}, { |
---|
83 | 3.511064999755643*^9, 3.5110650004264517`*^9}, {3.5110653389332542`*^9, |
---|
84 | 3.5110653450324244`*^9}}], |
---|
85 | |
---|
86 | Cell[CellGroupData[{ |
---|
87 | |
---|
88 | Cell[BoxData[ |
---|
89 | RowBox[{"ListPlot", "[", |
---|
90 | RowBox[{"calv0", ",", |
---|
91 | RowBox[{"PlotRange", "\[Rule]", |
---|
92 | RowBox[{"{", |
---|
93 | RowBox[{"All", ",", |
---|
94 | RowBox[{"{", |
---|
95 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
96 | CellChangeTimes->{{3.510485159057152*^9, 3.510485166604907*^9}, { |
---|
97 | 3.510485226189865*^9, 3.510485240596305*^9}, {3.510568473122991*^9, |
---|
98 | 3.5105685426859465`*^9}, {3.51056858732241*^9, 3.5105686369613733`*^9}, { |
---|
99 | 3.510568669384615*^9, 3.5105687303767138`*^9}, {3.510568794084084*^9, |
---|
100 | 3.5105688198266582`*^9}}], |
---|
101 | |
---|
102 | Cell[BoxData[ |
---|
103 | GraphicsBox[ |
---|
104 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
105 | 1:eJxd03lIk3Ecx/FpYynZQU3zKDzSeXaY97mPx+Y9t/DIpMI0KqNCbHmkMiMi |
---|
106 | O8SjaTVIKFTMUhGsSLN1mZSSClpqmtlMJWUqmEepFT7f/dEDDw+v5/38fs/B |
---|
107 | 7zE/cmbfUW0WiyX8u/87rm5TfB8bG4H9nJrPnIC0LaOlWUXWwYGpu7Vm7eRN |
---|
108 | GBPVrXg+JnNhkS9NMVk/xdgQIvXw0pMl6tsQrztgldJDNoOXS6mJ3izZAtf9 |
---|
109 | i+KevSJbQlq3/CGhmcyDPGl7fk0X2QbJTWeLDdl0Pzu8n58z2rqB7IDUpw48 |
---|
110 | V1PyLvSmCaae65P3QJ4dy17pp/kc8WVoXXGVNvW9YLcscnia93P673s4Yzqx |
---|
111 | 7WBY62/GLhifPq9YfqCNVbuiQ3ElylBBdkNTScHGzEdkdyiiy6of3iR7QNqu |
---|
112 | UpyqIXuib1ku55WTvVDgmLbTvIzsjUZFpaeqguyDF6nqr0X3yL5gm8cp2Zr5 |
---|
113 | +Mitt41NLyUD4XmWmUZvGMsAh2Ang4hK6n7g8ls+N7ym7oeJAVN1dDV1f6TN |
---|
114 | n6wXZlP3RzdbMqcVTD0AjTNxd9a6UQ9AZ0mqbY0d9UBsyakqc4umHgjbDGm+ |
---|
115 | Vhx1AWb0jBet3akL0F/5zXENXc8SImvylpVWMnUhpNq3dUwOUQ/CO/3BEQtf |
---|
116 | 6kEoXSnI+eVJPRifGvmD1THUg3Gt+YJzooR6CH4Muxor46mHwCahYvKw5vlC |
---|
117 | cbxwMosvpR4KTq484OrET2Y9hKEp437AaQ6znmRhGBEWNlzSrN9wnGhNvxE6 |
---|
118 | z1gWjkw3Ay5nhHoERlUC3tBH6hFoWVCIL7NofYrQ48FJqqX/VSbCZkerojHN |
---|
119 | +Eh0RUV+N6X/TxaJhVAzq3OT1MXosJ6xHDdm5oMYUW/tyo8t0vVidMZ7N40q |
---|
120 | GSvF4Jako5dL95dAMNujjNGl8RLk2RYG7t5B7yuB/cXu/S/71Pw/w1M4/Q== |
---|
121 | |
---|
122 | "]]}, |
---|
123 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
124 | Axes->True, |
---|
125 | AxesOrigin->{0, Automatic}, |
---|
126 | PlotRange->{All, {0, 4}}, |
---|
127 | PlotRangeClipping->True]], "Output", |
---|
128 | CellChangeTimes->{ |
---|
129 | 3.510568543339012*^9, {3.510568593199998*^9, 3.5105686374844255`*^9}, { |
---|
130 | 3.5105686742290993`*^9, 3.5105687307887554`*^9}, {3.5105687969993753`*^9, |
---|
131 | 3.5105688202857037`*^9}, 3.5105689783645105`*^9, 3.510569035179191*^9, |
---|
132 | 3.5110650041548996`*^9, 3.511065706385597*^9}] |
---|
133 | }, Open ]], |
---|
134 | |
---|
135 | Cell[CellGroupData[{ |
---|
136 | |
---|
137 | Cell[BoxData[ |
---|
138 | RowBox[{"level0", " ", "=", " ", |
---|
139 | RowBox[{"Median", "[", |
---|
140 | RowBox[{"calv0", "[", |
---|
141 | RowBox[{"[", |
---|
142 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
143 | CellChangeTimes->{{3.5110650299108295`*^9, 3.511065084152725*^9}}], |
---|
144 | |
---|
145 | Cell[BoxData["0.998663`"], "Output", |
---|
146 | CellChangeTimes->{{3.511065060034816*^9, 3.511065085806346*^9}, |
---|
147 | 3.511065706432396*^9}] |
---|
148 | }, Open ]], |
---|
149 | |
---|
150 | Cell[CellGroupData[{ |
---|
151 | |
---|
152 | Cell[BoxData[ |
---|
153 | RowBox[{"firstPlateauV0", " ", "=", " ", |
---|
154 | RowBox[{ |
---|
155 | RowBox[{"Median", "[", |
---|
156 | RowBox[{"calv0", "[", |
---|
157 | RowBox[{"[", |
---|
158 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
159 | "level0"}]}]], "Input", |
---|
160 | CellChangeTimes->{{3.5104853309903436`*^9, 3.510485459518195*^9}, { |
---|
161 | 3.5105684434050198`*^9, 3.5105684489285717`*^9}, {3.5105685562363014`*^9, |
---|
162 | 3.5105686094556227`*^9}, {3.510568892881963*^9, 3.510568899942669*^9}, { |
---|
163 | 3.511065099160117*^9, 3.5110651019681535`*^9}}], |
---|
164 | |
---|
165 | Cell[BoxData["1.333027`"], "Output", |
---|
166 | CellChangeTimes->{3.5104854048187256`*^9, 3.510485460199263*^9, |
---|
167 | 3.510485759516192*^9, 3.5105682912378044`*^9, 3.5105683412928095`*^9, |
---|
168 | 3.510568393279008*^9, 3.510568641949872*^9, 3.5105689139200664`*^9, |
---|
169 | 3.510568978415515*^9, 3.510569035216195*^9, 3.5110651035125732`*^9, |
---|
170 | 3.5110657064635954`*^9}] |
---|
171 | }, Open ]], |
---|
172 | |
---|
173 | Cell[CellGroupData[{ |
---|
174 | |
---|
175 | Cell[BoxData[ |
---|
176 | RowBox[{"secondPlateauV0", " ", "=", " ", |
---|
177 | RowBox[{ |
---|
178 | RowBox[{"Median", "[", |
---|
179 | RowBox[{"calv0", "[", |
---|
180 | RowBox[{"[", |
---|
181 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
182 | "level0"}]}]], "Input", |
---|
183 | CellChangeTimes->{{3.510485466973941*^9, 3.510485503540597*^9}, { |
---|
184 | 3.510485745583799*^9, 3.5104857458898296`*^9}, {3.5105686462232995`*^9, |
---|
185 | 3.5105686574044175`*^9}, {3.5105686914878254`*^9, 3.510568714078084*^9}, { |
---|
186 | 3.510568903906065*^9, 3.510568909599634*^9}, {3.511065108099032*^9, |
---|
187 | 3.5110651126854906`*^9}}], |
---|
188 | |
---|
189 | Cell[BoxData["1.292897`"], "Output", |
---|
190 | CellChangeTimes->{ |
---|
191 | 3.5104855048687296`*^9, 3.510485749006141*^9, 3.5105682912768087`*^9, |
---|
192 | 3.5105683413138113`*^9, 3.5105683933020096`*^9, {3.5105687099826746`*^9, |
---|
193 | 3.5105687148391604`*^9}, 3.510568916197294*^9, 3.5105689784595194`*^9, |
---|
194 | 3.510569035237197*^9, 3.5110651134031*^9, 3.511065706479195*^9}] |
---|
195 | }, Open ]], |
---|
196 | |
---|
197 | Cell[CellGroupData[{ |
---|
198 | |
---|
199 | Cell[BoxData[ |
---|
200 | RowBox[{"CoefV0", " ", "=", " ", |
---|
201 | RowBox[{"0.5", |
---|
202 | RowBox[{"(", |
---|
203 | RowBox[{"firstPlateauV0", "+", "secondPlateauV0"}], ")"}]}]}]], "Input", |
---|
204 | CellChangeTimes->{{3.5104855275750003`*^9, 3.510485554926735*^9}, { |
---|
205 | 3.510485751407381*^9, 3.5104857516414046`*^9}}], |
---|
206 | |
---|
207 | Cell[BoxData["1.312962`"], "Output", |
---|
208 | CellChangeTimes->{ |
---|
209 | 3.510485555287771*^9, {3.510485752134454*^9, 3.5104857636606064`*^9}, |
---|
210 | 3.5105682912988105`*^9, 3.5105683413358135`*^9, 3.510568393325012*^9, |
---|
211 | 3.5105687422469006`*^9, 3.510568978481522*^9, 3.510569035259199*^9, |
---|
212 | 3.511065117911558*^9, 3.5110657065103946`*^9}] |
---|
213 | }, Open ]], |
---|
214 | |
---|
215 | Cell[BoxData[ |
---|
216 | RowBox[{ |
---|
217 | RowBox[{"calv1", "=", " ", |
---|
218 | RowBox[{"Flatten", "[", |
---|
219 | RowBox[{"Drop", "[", |
---|
220 | RowBox[{ |
---|
221 | RowBox[{"Import", "[", |
---|
222 | RowBox[{"\"\<calibv11280.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
223 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
224 | CellChangeTimes->{{3.510485582467489*^9, 3.5104855859028325`*^9}, { |
---|
225 | 3.51056826929161*^9, 3.5105682788805685`*^9}, {3.5105683296836486`*^9, |
---|
226 | 3.5105683317928596`*^9}, {3.51056838190487*^9, 3.510568385624242*^9}, { |
---|
227 | 3.510568962172891*^9, 3.5105689658952637`*^9}, {3.510569029622636*^9, |
---|
228 | 3.5105690299226656`*^9}, {3.5110651299705124`*^9, 3.5110651304385185`*^9}}], |
---|
229 | |
---|
230 | Cell[CellGroupData[{ |
---|
231 | |
---|
232 | Cell[BoxData[ |
---|
233 | RowBox[{"ListPlot", "[", |
---|
234 | RowBox[{"calv1", ",", |
---|
235 | RowBox[{"PlotRange", "\[Rule]", |
---|
236 | RowBox[{"{", |
---|
237 | RowBox[{"All", ",", |
---|
238 | RowBox[{"{", |
---|
239 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
240 | CellChangeTimes->{{3.510485598649107*^9, 3.5104855988751297`*^9}, { |
---|
241 | 3.510568802164892*^9, 3.5105688243971148`*^9}}], |
---|
242 | |
---|
243 | Cell[BoxData[ |
---|
244 | GraphicsBox[ |
---|
245 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
246 | 1:eJw9kwss1VEcx/8pr4kuuZ5pWJqZ5HVv3r7X+3E9e0wxQ5MepNF6THIZG5ml |
---|
247 | EGmsWLMs7jLKo5K4pBlRUYq6XrMeKF2l1W6a/++e7ezscz7n9zuP/Y5ZQmpk |
---|
248 | ohLDMH5r/f+43pY8nUclKY5rIzsBbb7bo0g9YjWsLFz+Wc8l5sBYxilaMCXW |
---|
249 | RYeo3JD/fJFlA+QUcnkVKuS3gaNSnbFFn9gUE+UO77i/ab05Or+1JF3bRH4H |
---|
250 | dGQ5Yenfye8EX6WK4zJPbImSqemtTcvEVuh4EVN3RXFea8jnJAXiFfI26JUO |
---|
251 | iOcU97PFg2FmUkmd2A5KN9KXhIr89uA0irzc/xI7QD4U//ihIt4R6JJcMhpY |
---|
252 | ZZmHP7yDtdtr5CzzYTQh+CK8RbwHY/rqKc7lxE6wvztVNFBL7Iy8s235iz3E |
---|
253 | LrjQOtO6t53YFfOT3RZ9VcRuqK6QJVjWEbsj14qXcbOM2AOdmSZOSYp8npj9 |
---|
254 | qlanLCYGpBold3KGWRatXaeh43x9N3kB4pPNngkKyAuQd/1+VuJt8l7ozi62 |
---|
255 | jlNisO69UKlmXB17jGXGG79ONPm5+5D3hkejJnfajbwPVGS70tuTyfvgA7dL |
---|
256 | fiCNvC9KQ9qedsSQ90WqZnJZnB15P4i0lmeVo8j7obeOMRiKI++PkFzNMPE+ |
---|
257 | 8v5wra80/eRBPgA8watMJpJ8AFQHDSPGo8kHwolzVVlI+USBGMwfmfwYTD4I |
---|
258 | GeNScf8h8kF4Hb0x2uKNjH2fYDj7+qetbmHrRRSMzaW6UcxLqichWroK5sdG |
---|
259 | WRYJcWq4P/Kzot5CIEWAnu0Gig/B6YzAw81aVH+hyAoVXOTT/xCFQn7mrdh1 |
---|
260 | guLD8F47VCP2B/kwSC2cZNkz5MPRbH68ZqiPZYRjtLi1b0SV9gtHzz2bk7W0 |
---|
261 | /5NwlJgYZ59T5I9A4dT+Ub6E4iOQ0rBbZ1xxnggcOeqm3bO66PkPUqJFVg== |
---|
262 | |
---|
263 | "]]}, |
---|
264 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
265 | Axes->True, |
---|
266 | AxesOrigin->{0, Automatic}, |
---|
267 | PlotRange->{All, {0, 4}}, |
---|
268 | PlotRangeClipping->True]], "Output", |
---|
269 | CellChangeTimes->{ |
---|
270 | 3.5104855992771697`*^9, 3.510568291350816*^9, 3.510568341382818*^9, |
---|
271 | 3.5105683933710165`*^9, {3.5105688140000753`*^9, 3.510568824869162*^9}, |
---|
272 | 3.5105689785275264`*^9, 3.510569035306204*^9, 3.5110651353369813`*^9, |
---|
273 | 3.5110657065571938`*^9}] |
---|
274 | }, Open ]], |
---|
275 | |
---|
276 | Cell[CellGroupData[{ |
---|
277 | |
---|
278 | Cell[BoxData[ |
---|
279 | RowBox[{"level1", " ", "=", " ", |
---|
280 | RowBox[{"Median", "[", |
---|
281 | RowBox[{"calv0", "[", |
---|
282 | RowBox[{"[", |
---|
283 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
284 | CellChangeTimes->{{3.511065150219572*^9, 3.5110651582848754`*^9}}], |
---|
285 | |
---|
286 | Cell[BoxData["0.998663`"], "Output", |
---|
287 | CellChangeTimes->{3.511065159049285*^9, 3.511065706588393*^9}] |
---|
288 | }, Open ]], |
---|
289 | |
---|
290 | Cell[CellGroupData[{ |
---|
291 | |
---|
292 | Cell[BoxData[ |
---|
293 | RowBox[{"firstPlateauV1", " ", "=", " ", |
---|
294 | RowBox[{ |
---|
295 | RowBox[{"Median", "[", |
---|
296 | RowBox[{"calv1", "[", |
---|
297 | RowBox[{"[", |
---|
298 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
299 | "level1"}]}]], "Input", |
---|
300 | CellChangeTimes->{{3.5104856456538067`*^9, 3.5104856850247436`*^9}, { |
---|
301 | 3.510568752023878*^9, 3.5105687663173075`*^9}, {3.5105689197226467`*^9, |
---|
302 | 3.5105689337120457`*^9}, {3.5110651629805355`*^9, 3.511065164478155*^9}}], |
---|
303 | |
---|
304 | Cell[BoxData["0.9792170000000001`"], "Output", |
---|
305 | CellChangeTimes->{{3.5104856655577974`*^9, 3.510485685530794*^9}, |
---|
306 | 3.510568291380819*^9, 3.5105683414188223`*^9, 3.5105683934040203`*^9, |
---|
307 | 3.510568767270403*^9, 3.5105689347901535`*^9, 3.51056897856353*^9, |
---|
308 | 3.5105690353422074`*^9, 3.5110651654297667`*^9, 3.5110657066039925`*^9}] |
---|
309 | }, Open ]], |
---|
310 | |
---|
311 | Cell[CellGroupData[{ |
---|
312 | |
---|
313 | Cell[BoxData[ |
---|
314 | RowBox[{"secondPlateauV1", " ", "=", " ", |
---|
315 | RowBox[{ |
---|
316 | RowBox[{"Median", "[", |
---|
317 | RowBox[{"calv1", "[", |
---|
318 | RowBox[{"[", |
---|
319 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
320 | "level1"}]}]], "Input", |
---|
321 | CellChangeTimes->{{3.5104856974139824`*^9, 3.5104857138706284`*^9}, { |
---|
322 | 3.5105687714528213`*^9, 3.5105687850551815`*^9}, {3.5105689411467886`*^9, |
---|
323 | 3.5105689462793016`*^9}, {3.5110651685810075`*^9, 3.5110651703126297`*^9}}], |
---|
324 | |
---|
325 | Cell[BoxData["1.0435019999999997`"], "Output", |
---|
326 | CellChangeTimes->{3.510485714809722*^9, 3.5105682914028206`*^9, |
---|
327 | 3.5105683414388237`*^9, 3.510568393425022*^9, 3.5105687860472803`*^9, |
---|
328 | 3.5105689467363477`*^9, 3.510568978585532*^9, 3.5105690353652096`*^9, |
---|
329 | 3.5110651709834385`*^9, 3.511065706635192*^9}] |
---|
330 | }, Open ]], |
---|
331 | |
---|
332 | Cell[CellGroupData[{ |
---|
333 | |
---|
334 | Cell[BoxData[ |
---|
335 | RowBox[{"CoefV1", " ", "=", " ", |
---|
336 | RowBox[{"0.5", |
---|
337 | RowBox[{"(", |
---|
338 | RowBox[{"firstPlateauV1", "+", "secondPlateauV1"}], ")"}]}]}]], "Input", |
---|
339 | CellChangeTimes->{{3.510485724914732*^9, 3.510485738382079*^9}}], |
---|
340 | |
---|
341 | Cell[BoxData["1.0113595`"], "Output", |
---|
342 | CellChangeTimes->{{3.5104857311753583`*^9, 3.510485738956136*^9}, |
---|
343 | 3.510568291422823*^9, 3.510568341459826*^9, 3.510568393445024*^9, |
---|
344 | 3.5105689786065345`*^9, 3.510569035386212*^9, 3.5110651734950705`*^9, |
---|
345 | 3.511065706650792*^9}] |
---|
346 | }, Open ]] |
---|
347 | }, Open ]], |
---|
348 | |
---|
349 | Cell[CellGroupData[{ |
---|
350 | |
---|
351 | Cell["Calibration 1380 MHZ", "Section", |
---|
352 | CellChangeTimes->{{3.511065608295062*^9, 3.511065621538829*^9}}], |
---|
353 | |
---|
354 | Cell[BoxData[ |
---|
355 | RowBox[{ |
---|
356 | RowBox[{"calv0", "=", " ", |
---|
357 | RowBox[{"Flatten", "[", |
---|
358 | RowBox[{"Drop", "[", |
---|
359 | RowBox[{ |
---|
360 | RowBox[{"Import", "[", |
---|
361 | RowBox[{"\"\<calibv01380.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
362 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
363 | CellChangeTimes->{{3.510485126860933*^9, 3.5104851547187185`*^9}, { |
---|
364 | 3.510485210853331*^9, 3.5104852183190775`*^9}, {3.510568257000381*^9, |
---|
365 | 3.510568276243305*^9}, {3.5105683234930296`*^9, 3.5105683261923*^9}, { |
---|
366 | 3.5105683755972395`*^9, 3.510568377628443*^9}, {3.5105689538710613`*^9, |
---|
367 | 3.510568956222296*^9}, {3.510569023660039*^9, 3.5105690240910826`*^9}, { |
---|
368 | 3.511064999755643*^9, 3.5110650004264517`*^9}, {3.5110653389332542`*^9, |
---|
369 | 3.511065370240247*^9}}], |
---|
370 | |
---|
371 | Cell[CellGroupData[{ |
---|
372 | |
---|
373 | Cell[BoxData[ |
---|
374 | RowBox[{"ListPlot", "[", |
---|
375 | RowBox[{"calv0", ",", |
---|
376 | RowBox[{"PlotRange", "\[Rule]", |
---|
377 | RowBox[{"{", |
---|
378 | RowBox[{"All", ",", |
---|
379 | RowBox[{"{", |
---|
380 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
381 | CellChangeTimes->{{3.510485159057152*^9, 3.510485166604907*^9}, { |
---|
382 | 3.510485226189865*^9, 3.510485240596305*^9}, {3.510568473122991*^9, |
---|
383 | 3.5105685426859465`*^9}, {3.51056858732241*^9, 3.5105686369613733`*^9}, { |
---|
384 | 3.510568669384615*^9, 3.5105687303767138`*^9}, {3.510568794084084*^9, |
---|
385 | 3.5105688198266582`*^9}}], |
---|
386 | |
---|
387 | Cell[BoxData[ |
---|
388 | GraphicsBox[ |
---|
389 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
390 | 1:eJw91H8s1HEcx3E/b8rmyo92kzi/bkLmZ5Qf9zqHO7/OIb8y/XFHP/QHa4jV |
---|
391 | dGrK1BRRmV9h149Z8mNx5GeMfulmmCylRaVfkhprNTq5t+/23XeP7/P73T7f |
---|
392 | fd/fr6UkLSpFS0NDI0i1rx83tkVuXGJz71fzRa76BApCi7zl2mQ9FHQykWpE |
---|
393 | 3oackoyRuZ1kY/QpFelsGzILB2blFYNsshnml0uGju4is6F0fiA3WPquthVO |
---|
394 | uE3LlEzqNuhfi22RWpM5sGXklfH1yXb47ag899CNbI+VzLeV223Jjmg7ck3n |
---|
395 | zm6yE3qcy+1ZJmRnNGRb/3xsQXbBuDD0/Tc9sitGMk2P3fUhuyG1/2LPWXey |
---|
396 | O1KGg9iHJv+q7YElnvLwxG0tbHgv8svbzqTIyZ4o+PVqMq+V7IXV8exPnGby |
---|
397 | PihFDMGTBvJ+cKJ160s6yd5gVJ9iXq8k+2Bti1Ps+E2yL24xk8QzLWQ/JNSb |
---|
398 | 141WkbkYljLsZ2vIQKBh9yVJh9oyYM5Fu+zHfeo8SPb46fYpqPMwVGgaNtBE |
---|
399 | 3R/nY7qKc5Kp++P1jeqmwQFNdedDO9E23qxIbRkfmkaKTM/L1AMQ/5F1pbua |
---|
400 | egAax1Qv4B71QEhHM7JcFdQD4ZubNlbTTT0ImCp16HpGPQhZqtcv3+wCfE78 |
---|
401 | kJHwnLoAF3o5x8c31yeExCQt2byDuhBX49YXRD0YhRbShYOPqAcjijk6b1BH |
---|
402 | PQRl7daVO7qoh2DqxUr0rHxZPQ+heMc4ncuyVM+LLBTRxVul+jyan7CN5/Oi |
---|
403 | HoZ21bQEb85rODz+X0A9HBMc0cJJO+oiVHh1zNSSZSLwdcz8y0ypR8DhT6Pe |
---|
404 | qif1CAwIBkuFVtTFSHvZZtdK64EYb7JqO0T0vcnEsKjqXEqg/0GfGOl6ManL |
---|
405 | oPsjYZH/JVJBHZFIKmx42uNA90fC0Jg7NO2xyP0H0qsx1Q== |
---|
406 | "]]}, |
---|
407 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
408 | Axes->True, |
---|
409 | AxesOrigin->{0, Automatic}, |
---|
410 | PlotRange->{All, {0, 4}}, |
---|
411 | PlotRangeClipping->True]], "Output", |
---|
412 | CellChangeTimes->{ |
---|
413 | 3.510568543339012*^9, {3.510568593199998*^9, 3.5105686374844255`*^9}, { |
---|
414 | 3.5105686742290993`*^9, 3.5105687307887554`*^9}, {3.5105687969993753`*^9, |
---|
415 | 3.5105688202857037`*^9}, 3.5105689783645105`*^9, 3.510569035179191*^9, |
---|
416 | 3.5110650041548996`*^9, 3.511065706713191*^9}] |
---|
417 | }, Open ]], |
---|
418 | |
---|
419 | Cell[CellGroupData[{ |
---|
420 | |
---|
421 | Cell[BoxData[ |
---|
422 | RowBox[{"level0", " ", "=", " ", |
---|
423 | RowBox[{"Median", "[", |
---|
424 | RowBox[{"calv0", "[", |
---|
425 | RowBox[{"[", |
---|
426 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
427 | CellChangeTimes->{{3.5110650299108295`*^9, 3.511065084152725*^9}}], |
---|
428 | |
---|
429 | Cell[BoxData["1.00776`"], "Output", |
---|
430 | CellChangeTimes->{{3.511065060034816*^9, 3.511065085806346*^9}, |
---|
431 | 3.5110657067287903`*^9}] |
---|
432 | }, Open ]], |
---|
433 | |
---|
434 | Cell[CellGroupData[{ |
---|
435 | |
---|
436 | Cell[BoxData[ |
---|
437 | RowBox[{"firstPlateauV0", " ", "=", " ", |
---|
438 | RowBox[{ |
---|
439 | RowBox[{"Median", "[", |
---|
440 | RowBox[{"calv0", "[", |
---|
441 | RowBox[{"[", |
---|
442 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
443 | "level0"}]}]], "Input", |
---|
444 | CellChangeTimes->{{3.5104853309903436`*^9, 3.510485459518195*^9}, { |
---|
445 | 3.5105684434050198`*^9, 3.5105684489285717`*^9}, {3.5105685562363014`*^9, |
---|
446 | 3.5105686094556227`*^9}, {3.510568892881963*^9, 3.510568899942669*^9}, { |
---|
447 | 3.511065099160117*^9, 3.5110651019681535`*^9}}], |
---|
448 | |
---|
449 | Cell[BoxData["1.3281500000000002`"], "Output", |
---|
450 | CellChangeTimes->{3.5104854048187256`*^9, 3.510485460199263*^9, |
---|
451 | 3.510485759516192*^9, 3.5105682912378044`*^9, 3.5105683412928095`*^9, |
---|
452 | 3.510568393279008*^9, 3.510568641949872*^9, 3.5105689139200664`*^9, |
---|
453 | 3.510568978415515*^9, 3.510569035216195*^9, 3.5110651035125732`*^9, |
---|
454 | 3.5110657067599897`*^9}] |
---|
455 | }, Open ]], |
---|
456 | |
---|
457 | Cell[CellGroupData[{ |
---|
458 | |
---|
459 | Cell[BoxData[ |
---|
460 | RowBox[{"secondPlateauV0", " ", "=", " ", |
---|
461 | RowBox[{ |
---|
462 | RowBox[{"Median", "[", |
---|
463 | RowBox[{"calv0", "[", |
---|
464 | RowBox[{"[", |
---|
465 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
466 | "level0"}]}]], "Input", |
---|
467 | CellChangeTimes->{{3.510485466973941*^9, 3.510485503540597*^9}, { |
---|
468 | 3.510485745583799*^9, 3.5104857458898296`*^9}, {3.5105686462232995`*^9, |
---|
469 | 3.5105686574044175`*^9}, {3.5105686914878254`*^9, 3.510568714078084*^9}, { |
---|
470 | 3.510568903906065*^9, 3.510568909599634*^9}, {3.511065108099032*^9, |
---|
471 | 3.5110651126854906`*^9}}], |
---|
472 | |
---|
473 | Cell[BoxData["1.208715`"], "Output", |
---|
474 | CellChangeTimes->{ |
---|
475 | 3.5104855048687296`*^9, 3.510485749006141*^9, 3.5105682912768087`*^9, |
---|
476 | 3.5105683413138113`*^9, 3.5105683933020096`*^9, {3.5105687099826746`*^9, |
---|
477 | 3.5105687148391604`*^9}, 3.510568916197294*^9, 3.5105689784595194`*^9, |
---|
478 | 3.510569035237197*^9, 3.5110651134031*^9, 3.51106570677559*^9}] |
---|
479 | }, Open ]], |
---|
480 | |
---|
481 | Cell[CellGroupData[{ |
---|
482 | |
---|
483 | Cell[BoxData[ |
---|
484 | RowBox[{"CoefV0", " ", "=", " ", |
---|
485 | RowBox[{"0.5", |
---|
486 | RowBox[{"(", |
---|
487 | RowBox[{"firstPlateauV0", "+", "secondPlateauV0"}], ")"}]}]}]], "Input", |
---|
488 | CellChangeTimes->{{3.5104855275750003`*^9, 3.510485554926735*^9}, { |
---|
489 | 3.510485751407381*^9, 3.5104857516414046`*^9}}], |
---|
490 | |
---|
491 | Cell[BoxData["1.2684325`"], "Output", |
---|
492 | CellChangeTimes->{ |
---|
493 | 3.510485555287771*^9, {3.510485752134454*^9, 3.5104857636606064`*^9}, |
---|
494 | 3.5105682912988105`*^9, 3.5105683413358135`*^9, 3.510568393325012*^9, |
---|
495 | 3.5105687422469006`*^9, 3.510568978481522*^9, 3.510569035259199*^9, |
---|
496 | 3.511065117911558*^9, 3.5110657068067884`*^9}] |
---|
497 | }, Open ]], |
---|
498 | |
---|
499 | Cell[BoxData[ |
---|
500 | RowBox[{ |
---|
501 | RowBox[{"calv1", "=", " ", |
---|
502 | RowBox[{"Flatten", "[", |
---|
503 | RowBox[{"Drop", "[", |
---|
504 | RowBox[{ |
---|
505 | RowBox[{"Import", "[", |
---|
506 | RowBox[{"\"\<calibv11380.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
507 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
508 | CellChangeTimes->{{3.510485582467489*^9, 3.5104855859028325`*^9}, { |
---|
509 | 3.51056826929161*^9, 3.5105682788805685`*^9}, {3.5105683296836486`*^9, |
---|
510 | 3.5105683317928596`*^9}, {3.51056838190487*^9, 3.510568385624242*^9}, { |
---|
511 | 3.510568962172891*^9, 3.5105689658952637`*^9}, {3.510569029622636*^9, |
---|
512 | 3.5105690299226656`*^9}, {3.5110651299705124`*^9, 3.5110651304385185`*^9}, { |
---|
513 | 3.511065374420752*^9, 3.5110653747795267`*^9}}], |
---|
514 | |
---|
515 | Cell[CellGroupData[{ |
---|
516 | |
---|
517 | Cell[BoxData[ |
---|
518 | RowBox[{"ListPlot", "[", |
---|
519 | RowBox[{"calv1", ",", |
---|
520 | RowBox[{"PlotRange", "\[Rule]", |
---|
521 | RowBox[{"{", |
---|
522 | RowBox[{"All", ",", |
---|
523 | RowBox[{"{", |
---|
524 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
525 | CellChangeTimes->{{3.510485598649107*^9, 3.5104855988751297`*^9}, { |
---|
526 | 3.510568802164892*^9, 3.5105688243971148`*^9}}], |
---|
527 | |
---|
528 | Cell[BoxData[ |
---|
529 | GraphicsBox[ |
---|
530 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
531 | 1:eJw9k30s1HEcx48esM5Kbp7NOZbzOJ0Qjns7z893+IdUm6LRYq2b6clu7Cix |
---|
532 | iPpL5SqReWqlSOjIiilPy8o8j6Ri8lC4TWnuc7/tt99ev9f3833Y9/2xTEyP |
---|
533 | TtJkMBiB2+//786zJEiI171+2WFJoPqBPbk1aWtmxNqoC5q6xHIiPoCf4fIV |
---|
534 | Ey9iFkx1Jx2L2MRGqClaLkm1IDZDU/2uuQIuMRsbDn05LS7EHJTmyeKH+MTW |
---|
535 | uDeo2BRoER9Co/t6x2k7Yi4KuQu6bc7Edli8InA94UnsgL1rjhdeqc/jhJXY |
---|
536 | vFGmO7EzlBJ+cjmP+DA++ZjfNFbvjwd+Tu6Wjvq8LghZ5eXPGhAfwftGeWJZ |
---|
537 | +4aKXREnzkkxavurYjekbT6zsH1A7I6J9RGXME0GdvgoTi3GC32+kffApJzb |
---|
538 | b7NM7AnbOjtlnTaN94LHQJ2wp488H4E/qlKzq4i90Tlkn2Q8TeyDiuT9zzU7 |
---|
539 | iQVYaOGsT/QQA8a1D6t1aH9S4Pe+jM4XXeR9ka95lRN1ULW+1BfVwbKnsnLy |
---|
540 | QljxaqYLe6leCAHjSUTZKHk//JnP7MUseT90n6+UNGyR9wfr4i3Jhxny/hgo |
---|
541 | Ttjy2yQfgNeSEqPdBrR+ALK7pnrrv5IPhJ4bvzVa7QOhMPPOSh8iH4S8czd4 |
---|
542 | pur5g/BWWJsy/ot8ME5qfTQWj5APxgzLvHu2nXwIDF8OMMbpvqQhOFb6hV3C |
---|
543 | pPsIhdt3S5MxDfKhUHLkjnODa6r6MJgN6d/JhCov0jB0jMW1LAgpP+Hoz3p0 |
---|
544 | jWlPPhyfl1ZD4/aSj4D18HQMg0k+Anf1KloVhuQjkd8wNX+b8iuNhCvTQi+G |
---|
545 | Qz4KS7LuWAXlWRqFmeQmjfvqfhSh53HC1HHKN0QIdjGIOGND40XgZhU0n9VR |
---|
546 | 8RsRKgXKYo66X8QYz5A3R1pRvRj6/mNabFeqF2O4qOnd4Hb//gP7Jkjp |
---|
547 | "]]}, |
---|
548 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
549 | Axes->True, |
---|
550 | AxesOrigin->{0, Automatic}, |
---|
551 | PlotRange->{All, {0, 4}}, |
---|
552 | PlotRangeClipping->True]], "Output", |
---|
553 | CellChangeTimes->{ |
---|
554 | 3.5104855992771697`*^9, 3.510568291350816*^9, 3.510568341382818*^9, |
---|
555 | 3.5105683933710165`*^9, {3.5105688140000753`*^9, 3.510568824869162*^9}, |
---|
556 | 3.5105689785275264`*^9, 3.510569035306204*^9, 3.5110651353369813`*^9, |
---|
557 | 3.511065706853588*^9}] |
---|
558 | }, Open ]], |
---|
559 | |
---|
560 | Cell[CellGroupData[{ |
---|
561 | |
---|
562 | Cell[BoxData[ |
---|
563 | RowBox[{"level1", " ", "=", " ", |
---|
564 | RowBox[{"Median", "[", |
---|
565 | RowBox[{"calv0", "[", |
---|
566 | RowBox[{"[", |
---|
567 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
568 | CellChangeTimes->{{3.511065150219572*^9, 3.5110651582848754`*^9}}], |
---|
569 | |
---|
570 | Cell[BoxData["1.00776`"], "Output", |
---|
571 | CellChangeTimes->{3.511065159049285*^9, 3.5110657068847876`*^9}] |
---|
572 | }, Open ]], |
---|
573 | |
---|
574 | Cell[CellGroupData[{ |
---|
575 | |
---|
576 | Cell[BoxData[ |
---|
577 | RowBox[{"firstPlateauV1", " ", "=", " ", |
---|
578 | RowBox[{ |
---|
579 | RowBox[{"Median", "[", |
---|
580 | RowBox[{"calv1", "[", |
---|
581 | RowBox[{"[", |
---|
582 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
583 | "level1"}]}]], "Input", |
---|
584 | CellChangeTimes->{{3.5104856456538067`*^9, 3.5104856850247436`*^9}, { |
---|
585 | 3.510568752023878*^9, 3.5105687663173075`*^9}, {3.5105689197226467`*^9, |
---|
586 | 3.5105689337120457`*^9}, {3.5110651629805355`*^9, 3.511065164478155*^9}}], |
---|
587 | |
---|
588 | Cell[BoxData["0.9792700000000001`"], "Output", |
---|
589 | CellChangeTimes->{{3.5104856655577974`*^9, 3.510485685530794*^9}, |
---|
590 | 3.510568291380819*^9, 3.5105683414188223`*^9, 3.5105683934040203`*^9, |
---|
591 | 3.510568767270403*^9, 3.5105689347901535`*^9, 3.51056897856353*^9, |
---|
592 | 3.5105690353422074`*^9, 3.5110651654297667`*^9, 3.5110657069003873`*^9}] |
---|
593 | }, Open ]], |
---|
594 | |
---|
595 | Cell[BoxData[""], "Input", |
---|
596 | CellChangeTimes->{{3.5105689348231564`*^9, 3.5105689358642607`*^9}}], |
---|
597 | |
---|
598 | Cell[CellGroupData[{ |
---|
599 | |
---|
600 | Cell[BoxData[ |
---|
601 | RowBox[{"secondPlateauV1", " ", "=", " ", |
---|
602 | RowBox[{ |
---|
603 | RowBox[{"Median", "[", |
---|
604 | RowBox[{"calv1", "[", |
---|
605 | RowBox[{"[", |
---|
606 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
607 | "level1"}]}]], "Input", |
---|
608 | CellChangeTimes->{{3.5104856974139824`*^9, 3.5104857138706284`*^9}, { |
---|
609 | 3.5105687714528213`*^9, 3.5105687850551815`*^9}, {3.5105689411467886`*^9, |
---|
610 | 3.5105689462793016`*^9}, {3.5110651685810075`*^9, 3.5110651703126297`*^9}}], |
---|
611 | |
---|
612 | Cell[BoxData["0.987425`"], "Output", |
---|
613 | CellChangeTimes->{3.510485714809722*^9, 3.5105682914028206`*^9, |
---|
614 | 3.5105683414388237`*^9, 3.510568393425022*^9, 3.5105687860472803`*^9, |
---|
615 | 3.5105689467363477`*^9, 3.510568978585532*^9, 3.5105690353652096`*^9, |
---|
616 | 3.5110651709834385`*^9, 3.5110657069315863`*^9}] |
---|
617 | }, Open ]], |
---|
618 | |
---|
619 | Cell[CellGroupData[{ |
---|
620 | |
---|
621 | Cell[BoxData[ |
---|
622 | RowBox[{"CoefV1", " ", "=", " ", |
---|
623 | RowBox[{"0.5", |
---|
624 | RowBox[{"(", |
---|
625 | RowBox[{"firstPlateauV1", "+", "secondPlateauV1"}], ")"}]}]}]], "Input", |
---|
626 | CellChangeTimes->{{3.510485724914732*^9, 3.510485738382079*^9}}], |
---|
627 | |
---|
628 | Cell[BoxData["0.9833475`"], "Output", |
---|
629 | CellChangeTimes->{{3.5104857311753583`*^9, 3.510485738956136*^9}, |
---|
630 | 3.510568291422823*^9, 3.510568341459826*^9, 3.510568393445024*^9, |
---|
631 | 3.5105689786065345`*^9, 3.510569035386212*^9, 3.5110651734950705`*^9, |
---|
632 | 3.5110657069471865`*^9}] |
---|
633 | }, Open ]] |
---|
634 | }, Open ]], |
---|
635 | |
---|
636 | Cell[CellGroupData[{ |
---|
637 | |
---|
638 | Cell["Calibration 1410 MHZ", "Section", |
---|
639 | CellChangeTimes->{{3.511065673095837*^9, 3.5110656850452075`*^9}}], |
---|
640 | |
---|
641 | Cell[BoxData[ |
---|
642 | RowBox[{ |
---|
643 | RowBox[{"calv0", "=", " ", |
---|
644 | RowBox[{"Flatten", "[", |
---|
645 | RowBox[{"Drop", "[", |
---|
646 | RowBox[{ |
---|
647 | RowBox[{"Import", "[", |
---|
648 | RowBox[{"\"\<calibv01410.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
649 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
650 | CellChangeTimes->{{3.510485126860933*^9, 3.5104851547187185`*^9}, { |
---|
651 | 3.510485210853331*^9, 3.5104852183190775`*^9}, {3.510568257000381*^9, |
---|
652 | 3.510568276243305*^9}, {3.5105683234930296`*^9, 3.5105683261923*^9}, { |
---|
653 | 3.5105683755972395`*^9, 3.510568377628443*^9}, {3.5105689538710613`*^9, |
---|
654 | 3.510568956222296*^9}, {3.510569023660039*^9, 3.5105690240910826`*^9}, { |
---|
655 | 3.511064999755643*^9, 3.5110650004264517`*^9}, {3.5110653389332542`*^9, |
---|
656 | 3.5110653450324244`*^9}, {3.5110654013288546`*^9, 3.511065404043063*^9}}], |
---|
657 | |
---|
658 | Cell[CellGroupData[{ |
---|
659 | |
---|
660 | Cell[BoxData[ |
---|
661 | RowBox[{"ListPlot", "[", |
---|
662 | RowBox[{"calv0", ",", |
---|
663 | RowBox[{"PlotRange", "\[Rule]", |
---|
664 | RowBox[{"{", |
---|
665 | RowBox[{"All", ",", |
---|
666 | RowBox[{"{", |
---|
667 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
668 | CellChangeTimes->{{3.510485159057152*^9, 3.510485166604907*^9}, { |
---|
669 | 3.510485226189865*^9, 3.510485240596305*^9}, {3.510568473122991*^9, |
---|
670 | 3.5105685426859465`*^9}, {3.51056858732241*^9, 3.5105686369613733`*^9}, { |
---|
671 | 3.510568669384615*^9, 3.5105687303767138`*^9}, {3.510568794084084*^9, |
---|
672 | 3.5105688198266582`*^9}}], |
---|
673 | |
---|
674 | Cell[BoxData[ |
---|
675 | GraphicsBox[ |
---|
676 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
677 | 1:eJw90wlIk2Ecx/FlRt5lDmZmaKIiZh7lmeZ+npv3tNAiBfFIpUOsBEdJc+nM |
---|
678 | Dk1T0ygjETQrKSwqQs3bLEmmpPOoaWSeuEg0r1bi+98L4+W7z54/L++eZ19c |
---|
679 | akSiGovF8v//2bhvXgpuXLYi+buGgst8gQPl8cKohnmmNVAm799etES9EwZ6 |
---|
680 | De2tq9RssLkdI6/Uab0hlGbJn8ynyY2xnBNV5DFAbQrtWYdC6Sy1GRbvjt7J |
---|
681 | 3UbrzfGO/8jm8jq5Jbosl/WbxqmtcOZksczUgH5vDaXQyJ6/Qm6D9cV0+X19 |
---|
682 | cluUZ3X/WdpNbQ/psbAJE9V8B9wcTmalbiE/iCm9uCStvdSHwG8r5ldyqB3B |
---|
683 | uTfjKJUuMe2E6uixGNu4Naad0Z/o8GLZldoF7EkDYdFFalfYK0YuvUmgdoP4 |
---|
684 | 2S4bvSTqw6gVhwc8EFG7w3NS9nQlmtoD5lc2JlAfQV0fP+jHWWpP8Aq+DS+o |
---|
685 | 5nGR5JuSqsihBgYHLWpfS5gWAdLVjoGKE+ReUGraRvbHknuB9+HJBR0+uTe8 |
---|
686 | xOOdZe5/GffGTOTngPlhFjbdB3aS85Ux7UyLfKBR4Jx//CO5L4oK659Xj5L7 |
---|
687 | wnNOMZDQQ+4H3VZeW3EXuR98lOqc/dPk/tga63FV0kjuj0nxSqkbzWPx0Os7 |
---|
688 | qFjoJuehJaX5RmMLOR950q9y7T5yPuYnHuu9lZEHbP7/qucLwJx11VrVEHkg |
---|
689 | xqyE6fnN5IHIrO+5NaW5yLyfIOzJyohpkjP7SxSEuvjotLR+2m/BWMg9VRHd |
---|
690 | Rx4MH3Vj7xIj2l8hyJW015yeIw+Bpmu2tZPqvIXiZZTJjkw6j6JQ+A11PKxR |
---|
691 | nacwuFz7ct25kzwMrVm3bWLVaL4Aeb0aznVKxiGArov8dyudf5EAZSvCo4Va |
---|
692 | TL8XgF2aARmb1ofjl/9EIdeQaYSjRHzOLkWH1ocjIvMnx2JynvsPielTEQ== |
---|
693 | |
---|
694 | "]]}, |
---|
695 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
696 | Axes->True, |
---|
697 | AxesOrigin->{0, Automatic}, |
---|
698 | PlotRange->{All, {0, 4}}, |
---|
699 | PlotRangeClipping->True]], "Output", |
---|
700 | CellChangeTimes->{ |
---|
701 | 3.510568543339012*^9, {3.510568593199998*^9, 3.5105686374844255`*^9}, { |
---|
702 | 3.5105686742290993`*^9, 3.5105687307887554`*^9}, {3.5105687969993753`*^9, |
---|
703 | 3.5105688202857037`*^9}, 3.5105689783645105`*^9, 3.510569035179191*^9, |
---|
704 | 3.5110650041548996`*^9, 3.511065707009585*^9}] |
---|
705 | }, Open ]], |
---|
706 | |
---|
707 | Cell[CellGroupData[{ |
---|
708 | |
---|
709 | Cell[BoxData[ |
---|
710 | RowBox[{"level0", " ", "=", " ", |
---|
711 | RowBox[{"Median", "[", |
---|
712 | RowBox[{"calv0", "[", |
---|
713 | RowBox[{"[", |
---|
714 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
715 | CellChangeTimes->{{3.5110650299108295`*^9, 3.511065084152725*^9}}], |
---|
716 | |
---|
717 | Cell[BoxData["1.00035`"], "Output", |
---|
718 | CellChangeTimes->{{3.511065060034816*^9, 3.511065085806346*^9}, |
---|
719 | 3.5110657070407844`*^9}] |
---|
720 | }, Open ]], |
---|
721 | |
---|
722 | Cell[CellGroupData[{ |
---|
723 | |
---|
724 | Cell[BoxData[ |
---|
725 | RowBox[{"firstPlateauV0", " ", "=", " ", |
---|
726 | RowBox[{ |
---|
727 | RowBox[{"Median", "[", |
---|
728 | RowBox[{"calv0", "[", |
---|
729 | RowBox[{"[", |
---|
730 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
731 | "level0"}]}]], "Input", |
---|
732 | CellChangeTimes->{{3.5104853309903436`*^9, 3.510485459518195*^9}, { |
---|
733 | 3.5105684434050198`*^9, 3.5105684489285717`*^9}, {3.5105685562363014`*^9, |
---|
734 | 3.5105686094556227`*^9}, {3.510568892881963*^9, 3.510568899942669*^9}, { |
---|
735 | 3.511065099160117*^9, 3.5110651019681535`*^9}}], |
---|
736 | |
---|
737 | Cell[BoxData["0.77481`"], "Output", |
---|
738 | CellChangeTimes->{3.5104854048187256`*^9, 3.510485460199263*^9, |
---|
739 | 3.510485759516192*^9, 3.5105682912378044`*^9, 3.5105683412928095`*^9, |
---|
740 | 3.510568393279008*^9, 3.510568641949872*^9, 3.5105689139200664`*^9, |
---|
741 | 3.510568978415515*^9, 3.510569035216195*^9, 3.5110651035125732`*^9, |
---|
742 | 3.511065707056384*^9}] |
---|
743 | }, Open ]], |
---|
744 | |
---|
745 | Cell[CellGroupData[{ |
---|
746 | |
---|
747 | Cell[BoxData[ |
---|
748 | RowBox[{"secondPlateauV0", " ", "=", " ", |
---|
749 | RowBox[{ |
---|
750 | RowBox[{"Median", "[", |
---|
751 | RowBox[{"calv0", "[", |
---|
752 | RowBox[{"[", |
---|
753 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
754 | "level0"}]}]], "Input", |
---|
755 | CellChangeTimes->{{3.510485466973941*^9, 3.510485503540597*^9}, { |
---|
756 | 3.510485745583799*^9, 3.5104857458898296`*^9}, {3.5105686462232995`*^9, |
---|
757 | 3.5105686574044175`*^9}, {3.5105686914878254`*^9, 3.510568714078084*^9}, { |
---|
758 | 3.510568903906065*^9, 3.510568909599634*^9}, {3.511065108099032*^9, |
---|
759 | 3.5110651126854906`*^9}}], |
---|
760 | |
---|
761 | Cell[BoxData["1.1013200000000003`"], "Output", |
---|
762 | CellChangeTimes->{ |
---|
763 | 3.5104855048687296`*^9, 3.510485749006141*^9, 3.5105682912768087`*^9, |
---|
764 | 3.5105683413138113`*^9, 3.5105683933020096`*^9, {3.5105687099826746`*^9, |
---|
765 | 3.5105687148391604`*^9}, 3.510568916197294*^9, 3.5105689784595194`*^9, |
---|
766 | 3.510569035237197*^9, 3.5110651134031*^9, 3.5110657070875835`*^9}] |
---|
767 | }, Open ]], |
---|
768 | |
---|
769 | Cell[CellGroupData[{ |
---|
770 | |
---|
771 | Cell[BoxData[ |
---|
772 | RowBox[{"CoefV0", " ", "=", " ", |
---|
773 | RowBox[{"0.5", |
---|
774 | RowBox[{"(", |
---|
775 | RowBox[{"firstPlateauV0", "+", "secondPlateauV0"}], ")"}]}]}]], "Input", |
---|
776 | CellChangeTimes->{{3.5104855275750003`*^9, 3.510485554926735*^9}, { |
---|
777 | 3.510485751407381*^9, 3.5104857516414046`*^9}}], |
---|
778 | |
---|
779 | Cell[BoxData["0.9380650000000001`"], "Output", |
---|
780 | CellChangeTimes->{ |
---|
781 | 3.510485555287771*^9, {3.510485752134454*^9, 3.5104857636606064`*^9}, |
---|
782 | 3.5105682912988105`*^9, 3.5105683413358135`*^9, 3.510568393325012*^9, |
---|
783 | 3.5105687422469006`*^9, 3.510568978481522*^9, 3.510569035259199*^9, |
---|
784 | 3.511065117911558*^9, 3.5110657071343822`*^9}] |
---|
785 | }, Open ]], |
---|
786 | |
---|
787 | Cell[BoxData[ |
---|
788 | RowBox[{ |
---|
789 | RowBox[{"calv1", "=", " ", |
---|
790 | RowBox[{"Flatten", "[", |
---|
791 | RowBox[{"Drop", "[", |
---|
792 | RowBox[{ |
---|
793 | RowBox[{"Import", "[", |
---|
794 | RowBox[{"\"\<calibv11410.txt\>\"", ",", "\"\<Table\>\""}], "]"}], ",", |
---|
795 | "1"}], "]"}], "]"}]}], ";"}]], "Input", |
---|
796 | CellChangeTimes->{{3.510485582467489*^9, 3.5104855859028325`*^9}, { |
---|
797 | 3.51056826929161*^9, 3.5105682788805685`*^9}, {3.5105683296836486`*^9, |
---|
798 | 3.5105683317928596`*^9}, {3.51056838190487*^9, 3.510568385624242*^9}, { |
---|
799 | 3.510568962172891*^9, 3.5105689658952637`*^9}, {3.510569029622636*^9, |
---|
800 | 3.5105690299226656`*^9}, {3.5110651299705124`*^9, 3.5110651304385185`*^9}, { |
---|
801 | 3.5110654135015974`*^9, 3.5110654186336355`*^9}}], |
---|
802 | |
---|
803 | Cell[CellGroupData[{ |
---|
804 | |
---|
805 | Cell[BoxData[ |
---|
806 | RowBox[{"ListPlot", "[", |
---|
807 | RowBox[{"calv1", ",", |
---|
808 | RowBox[{"PlotRange", "\[Rule]", |
---|
809 | RowBox[{"{", |
---|
810 | RowBox[{"All", ",", |
---|
811 | RowBox[{"{", |
---|
812 | RowBox[{"0", ",", "4"}], "}"}]}], "}"}]}]}], "]"}]], "Input", |
---|
813 | CellChangeTimes->{{3.510485598649107*^9, 3.5104855988751297`*^9}, { |
---|
814 | 3.510568802164892*^9, 3.5105688243971148`*^9}}], |
---|
815 | |
---|
816 | Cell[BoxData[ |
---|
817 | GraphicsBox[ |
---|
818 | {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" |
---|
819 | 1:eJxd02tIU3EYx/GlpS7xQhYzM9O8NNR5Ny9N99t0m9ucThPyVqEZUaa+UFEr |
---|
820 | a5ZmokQZhIVJXsiQ1ESZUVFSSeDyhVY2wQtIarRsllqSmCmdZy8cjMN3n+f8 |
---|
821 | 2cZzXDLzEk+asFgsyfp74/r/NS/YI33U37p+ZT7A9MXKJuyjtkAElyv2+m1g |
---|
822 | 2hbPb5Z8tjEj34kmjVWz8zK5PbK6lJ4OempHWB5b3NWym+adMSNomXxhTb0f |
---|
823 | NeWaesUPmnfDMGvChL2d3ANJNQshjbbUXOxYuhyf/5PmPZGRlHjgPpvcG3uL |
---|
824 | 5Ob6NXKfTe2H+BTlJ7txav9NvycAQd6So9kG8kA41zW/NcxRB6Hqa3tZe+0v |
---|
825 | poOxxMt/6u3xh+mDaFz2n+lwpw5BpKDG1imHOhSyEz3X24zzYeg2Ty1z8aIO |
---|
826 | h2mae7JjHPUh5Ok03G4hNR/ObpZ1fTzqCChSroaOiKkjUTd+q7IilVoA2GW8 |
---|
827 | fm88H3g1nvJsTsS0GnCVn7/iG0suRHit9lKMgFyI6Y9hZlm+5CLMB/o4WshW |
---|
828 | GBfhdmSBsFSxyngUusaGz8SkM62OQjTnQ++70+TR2Dj+ZSl5NO75VFcNSsnF |
---|
829 | yHloP5snIhcjl3NXH5RILkF60UJSpfF8Cdiqw9qRc+RSaBvFmgXj+VJ81/eF |
---|
830 | ucrJY/DFrqS2QEkeA2kor3joCLkMGt7A2RsychmOG/4Wd6aSy1E43c23ySWX |
---|
831 | YzKgVZs5tci4AthYb0dmn9QKjHleK+tYpf2JhV+DMGptK3ks6vurK1yM+6yE |
---|
832 | 2OpBxrIFuRI9swHB7AnyOASdKh3wH2VaHQdvnYQ/Okgej6lkTu8QPc/qeNh2 |
---|
833 | 6jnfjPutgk7n3tZLDRUcONblWVtoXgV+k6gwn57HPhXK0tb/cHO6PwHV2Rc8 |
---|
834 | VmYZRwLuNDx+YzpA3ycBFfqEJ07b5gX/AOWURyw= |
---|
835 | "]]}, |
---|
836 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
837 | Axes->True, |
---|
838 | AxesOrigin->{0, Automatic}, |
---|
839 | PlotRange->{All, {0, 4}}, |
---|
840 | PlotRangeClipping->True]], "Output", |
---|
841 | CellChangeTimes->{ |
---|
842 | 3.5104855992771697`*^9, 3.510568291350816*^9, 3.510568341382818*^9, |
---|
843 | 3.5105683933710165`*^9, {3.5105688140000753`*^9, 3.510568824869162*^9}, |
---|
844 | 3.5105689785275264`*^9, 3.510569035306204*^9, 3.5110651353369813`*^9, |
---|
845 | 3.511065707181182*^9}] |
---|
846 | }, Open ]], |
---|
847 | |
---|
848 | Cell[CellGroupData[{ |
---|
849 | |
---|
850 | Cell[BoxData[ |
---|
851 | RowBox[{"level1", " ", "=", " ", |
---|
852 | RowBox[{"Median", "[", |
---|
853 | RowBox[{"calv0", "[", |
---|
854 | RowBox[{"[", |
---|
855 | RowBox[{"1", ";;", "lower1"}], "]"}], "]"}], "]"}]}]], "Input", |
---|
856 | CellChangeTimes->{{3.511065150219572*^9, 3.5110651582848754`*^9}}], |
---|
857 | |
---|
858 | Cell[BoxData["1.00035`"], "Output", |
---|
859 | CellChangeTimes->{3.511065159049285*^9, 3.511065707196781*^9}] |
---|
860 | }, Open ]], |
---|
861 | |
---|
862 | Cell[CellGroupData[{ |
---|
863 | |
---|
864 | Cell[BoxData[ |
---|
865 | RowBox[{"firstPlateauV1", " ", "=", " ", |
---|
866 | RowBox[{ |
---|
867 | RowBox[{"Median", "[", |
---|
868 | RowBox[{"calv1", "[", |
---|
869 | RowBox[{"[", |
---|
870 | RowBox[{"lower1", ";;", "upper1"}], "]"}], "]"}], "]"}], "-", |
---|
871 | "level1"}]}]], "Input", |
---|
872 | CellChangeTimes->{{3.5104856456538067`*^9, 3.5104856850247436`*^9}, { |
---|
873 | 3.510568752023878*^9, 3.5105687663173075`*^9}, {3.5105689197226467`*^9, |
---|
874 | 3.5105689337120457`*^9}, {3.5110651629805355`*^9, 3.511065164478155*^9}}], |
---|
875 | |
---|
876 | Cell[BoxData["0.6400999999999999`"], "Output", |
---|
877 | CellChangeTimes->{{3.5104856655577974`*^9, 3.510485685530794*^9}, |
---|
878 | 3.510568291380819*^9, 3.5105683414188223`*^9, 3.5105683934040203`*^9, |
---|
879 | 3.510568767270403*^9, 3.5105689347901535`*^9, 3.51056897856353*^9, |
---|
880 | 3.5105690353422074`*^9, 3.5110651654297667`*^9, 3.5110657072279806`*^9}] |
---|
881 | }, Open ]], |
---|
882 | |
---|
883 | Cell[BoxData[""], "Input", |
---|
884 | CellChangeTimes->{{3.5105689348231564`*^9, 3.5105689358642607`*^9}}], |
---|
885 | |
---|
886 | Cell[CellGroupData[{ |
---|
887 | |
---|
888 | Cell[BoxData[ |
---|
889 | RowBox[{"secondPlateauV1", " ", "=", " ", |
---|
890 | RowBox[{ |
---|
891 | RowBox[{"Median", "[", |
---|
892 | RowBox[{"calv1", "[", |
---|
893 | RowBox[{"[", |
---|
894 | RowBox[{"lower2", ";;", "upper2"}], "]"}], "]"}], "]"}], "-", |
---|
895 | "level1"}]}]], "Input", |
---|
896 | CellChangeTimes->{{3.5104856974139824`*^9, 3.5104857138706284`*^9}, { |
---|
897 | 3.5105687714528213`*^9, 3.5105687850551815`*^9}, {3.5105689411467886`*^9, |
---|
898 | 3.5105689462793016`*^9}, {3.5110651685810075`*^9, 3.5110651703126297`*^9}}], |
---|
899 | |
---|
900 | Cell[BoxData["0.8339399999999999`"], "Output", |
---|
901 | CellChangeTimes->{3.510485714809722*^9, 3.5105682914028206`*^9, |
---|
902 | 3.5105683414388237`*^9, 3.510568393425022*^9, 3.5105687860472803`*^9, |
---|
903 | 3.5105689467363477`*^9, 3.510568978585532*^9, 3.5105690353652096`*^9, |
---|
904 | 3.5110651709834385`*^9, 3.5110657072435803`*^9}] |
---|
905 | }, Open ]], |
---|
906 | |
---|
907 | Cell[CellGroupData[{ |
---|
908 | |
---|
909 | Cell[BoxData[ |
---|
910 | RowBox[{"CoefV1", " ", "=", " ", |
---|
911 | RowBox[{"0.5", |
---|
912 | RowBox[{"(", |
---|
913 | RowBox[{"firstPlateauV1", "+", "secondPlateauV1"}], ")"}]}]}]], "Input", |
---|
914 | CellChangeTimes->{{3.510485724914732*^9, 3.510485738382079*^9}}], |
---|
915 | |
---|
916 | Cell[BoxData["0.7370199999999999`"], "Output", |
---|
917 | CellChangeTimes->{{3.5104857311753583`*^9, 3.510485738956136*^9}, |
---|
918 | 3.510568291422823*^9, 3.510568341459826*^9, 3.510568393445024*^9, |
---|
919 | 3.5105689786065345`*^9, 3.510569035386212*^9, 3.5110651734950705`*^9, |
---|
920 | 3.5110657072747803`*^9}] |
---|
921 | }, Open ]], |
---|
922 | |
---|
923 | Cell[CellGroupData[{ |
---|
924 | |
---|
925 | Cell[BoxData[ |
---|
926 | RowBox[{"\[IndentingNewLine]", |
---|
927 | RowBox[{"ListPlot", "[", |
---|
928 | RowBox[{ |
---|
929 | RowBox[{"{", |
---|
930 | RowBox[{ |
---|
931 | RowBox[{"{", |
---|
932 | RowBox[{"1280", ",", |
---|
933 | RowBox[{"1.44269", " ", |
---|
934 | RowBox[{"23.943", "/", |
---|
935 | RowBox[{"(", |
---|
936 | RowBox[{"3.333844", "-", "1.44269"}], ")"}]}]}]}], "}"}], ",", |
---|
937 | RowBox[{"{", |
---|
938 | RowBox[{"1380", ",", |
---|
939 | RowBox[{"1.44269", " ", |
---|
940 | RowBox[{"21.874", "/", |
---|
941 | RowBox[{"(", |
---|
942 | RowBox[{"3.276134", "-", "1.44269"}], ")"}]}]}]}], "}"}], ",", |
---|
943 | RowBox[{"{", |
---|
944 | RowBox[{"1410", ",", " ", |
---|
945 | RowBox[{"1.44269", " ", |
---|
946 | RowBox[{"16.870", "/", |
---|
947 | RowBox[{"(", |
---|
948 | RowBox[{"2.789284", "-", "1.44269"}], ")"}]}]}]}], "}"}]}], "}"}], |
---|
949 | ",", |
---|
950 | RowBox[{"PlotRange", "\[Rule]", |
---|
951 | RowBox[{"{", |
---|
952 | RowBox[{"All", ",", |
---|
953 | RowBox[{"{", |
---|
954 | RowBox[{"0", ",", "30"}], "}"}]}], "}"}]}], ",", |
---|
955 | RowBox[{"PlotMarkers", "\[Rule]", "Automatic"}]}], "]"}]}]], "Input", |
---|
956 | CellChangeTimes->{{3.5110667102249165`*^9, 3.5110667371038885`*^9}, { |
---|
957 | 3.5110668667095194`*^9, 3.51106704109344*^9}, {3.511067093400575*^9, |
---|
958 | 3.511067097597002*^9}, {3.5110672336766744`*^9, 3.511067276951352*^9}}], |
---|
959 | |
---|
960 | Cell[BoxData[ |
---|
961 | GraphicsBox[ |
---|
962 | GraphicsComplexBox[{{1280., 18.26521090826025}, {1380., |
---|
963 | 17.21208886663569}, {1410., 18.073881437166662`}, {1280., |
---|
964 | 18.26521090826025}, {1380., 17.21208886663569}, {1410., |
---|
965 | 18.073881437166662`}}, { |
---|
966 | {Hue[0.67, 0.6, 0.6], InsetBox[ |
---|
967 | StyleBox["\<\"\[FilledCircle]\"\>", |
---|
968 | StripOnInput->False, |
---|
969 | FontSize->8.96], 4], InsetBox[ |
---|
970 | StyleBox["\<\"\[FilledCircle]\"\>", |
---|
971 | StripOnInput->False, |
---|
972 | FontSize->8.96], 5], InsetBox[ |
---|
973 | StyleBox["\<\"\[FilledCircle]\"\>", |
---|
974 | StripOnInput->False, |
---|
975 | FontSize->8.96], 6]}, {}}], |
---|
976 | AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], |
---|
977 | Axes->True, |
---|
978 | AxesOrigin->{1280., 0}, |
---|
979 | PlotRange->{All, {0, 30}}, |
---|
980 | PlotRangeClipping->True, |
---|
981 | PlotRangePadding->{Automatic, Automatic}]], "Output", |
---|
982 | CellChangeTimes->{{3.511066976805428*^9, 3.5110670414834423`*^9}, |
---|
983 | 3.511067098501808*^9, {3.51106725943244*^9, 3.511067277466155*^9}}] |
---|
984 | }, Open ]] |
---|
985 | }, Open ]] |
---|
986 | }, |
---|
987 | WindowSize->{707, 761}, |
---|
988 | WindowMargins->{{Automatic, -23}, {31, Automatic}}, |
---|
989 | FrontEndVersion->"8.0 for Microsoft Windows (32-bit) (November 7, 2010)", |
---|
990 | StyleDefinitions->FrontEnd`FileName[{"Creative"}, "PastelColor.nb", |
---|
991 | CharacterEncoding -> "WindowsANSI"] |
---|
992 | ] |
---|
993 | (* End of Notebook Content *) |
---|
994 | |
---|
995 | (* Internal cache information *) |
---|
996 | (*CellTagsOutline |
---|
997 | CellTagsIndex->{} |
---|
998 | *) |
---|
999 | (*CellTagsIndex |
---|
1000 | CellTagsIndex->{} |
---|
1001 | *) |
---|
1002 | (*NotebookFileOutline |
---|
1003 | Notebook[{ |
---|
1004 | Cell[CellGroupData[{ |
---|
1005 | Cell[579, 22, 196, 4, 41, "Input"], |
---|
1006 | Cell[778, 28, 206, 3, 40, "Output"] |
---|
1007 | }, Open ]], |
---|
1008 | Cell[CellGroupData[{ |
---|
1009 | Cell[1021, 36, 174, 3, 75, "Section"], |
---|
1010 | Cell[1198, 41, 151, 3, 41, "Input"], |
---|
1011 | Cell[1352, 46, 148, 3, 41, "Input"], |
---|
1012 | Cell[1503, 51, 151, 3, 41, "Input"], |
---|
1013 | Cell[1657, 56, 141, 3, 41, "Input"] |
---|
1014 | }, Open ]], |
---|
1015 | Cell[CellGroupData[{ |
---|
1016 | Cell[1835, 64, 188, 2, 75, "Section"], |
---|
1017 | Cell[2026, 68, 744, 15, 41, "Input"], |
---|
1018 | Cell[CellGroupData[{ |
---|
1019 | Cell[2795, 87, 549, 12, 41, "Input"], |
---|
1020 | Cell[3347, 101, 1535, 30, 268, "Output"] |
---|
1021 | }, Open ]], |
---|
1022 | Cell[CellGroupData[{ |
---|
1023 | Cell[4919, 136, 255, 6, 41, "Input"], |
---|
1024 | Cell[5177, 144, 128, 2, 40, "Output"] |
---|
1025 | }, Open ]], |
---|
1026 | Cell[CellGroupData[{ |
---|
1027 | Cell[5342, 151, 507, 11, 41, "Input"], |
---|
1028 | Cell[5852, 164, 344, 5, 40, "Output"] |
---|
1029 | }, Open ]], |
---|
1030 | Cell[CellGroupData[{ |
---|
1031 | Cell[6233, 174, 555, 12, 41, "Input"], |
---|
1032 | Cell[6791, 188, 349, 5, 40, "Output"] |
---|
1033 | }, Open ]], |
---|
1034 | Cell[CellGroupData[{ |
---|
1035 | Cell[7177, 198, 279, 6, 41, "Input"], |
---|
1036 | Cell[7459, 206, 325, 5, 40, "Output"] |
---|
1037 | }, Open ]], |
---|
1038 | Cell[7799, 214, 644, 13, 41, "Input"], |
---|
1039 | Cell[CellGroupData[{ |
---|
1040 | Cell[8468, 231, 353, 9, 41, "Input"], |
---|
1041 | Cell[8824, 242, 1507, 30, 268, "Output"] |
---|
1042 | }, Open ]], |
---|
1043 | Cell[CellGroupData[{ |
---|
1044 | Cell[10368, 277, 255, 6, 41, "Input"], |
---|
1045 | Cell[10626, 285, 100, 1, 40, "Output"] |
---|
1046 | }, Open ]], |
---|
1047 | Cell[CellGroupData[{ |
---|
1048 | Cell[10763, 291, 458, 10, 41, "Input"], |
---|
1049 | Cell[11224, 303, 335, 4, 40, "Output"] |
---|
1050 | }, Open ]], |
---|
1051 | Cell[CellGroupData[{ |
---|
1052 | Cell[11596, 312, 463, 10, 41, "Input"], |
---|
1053 | Cell[12062, 324, 307, 4, 40, "Output"] |
---|
1054 | }, Open ]], |
---|
1055 | Cell[CellGroupData[{ |
---|
1056 | Cell[12406, 333, 226, 5, 41, "Input"], |
---|
1057 | Cell[12635, 340, 275, 4, 40, "Output"] |
---|
1058 | }, Open ]] |
---|
1059 | }, Open ]], |
---|
1060 | Cell[CellGroupData[{ |
---|
1061 | Cell[12959, 350, 105, 1, 89, "Section"], |
---|
1062 | Cell[13067, 353, 742, 15, 41, "Input"], |
---|
1063 | Cell[CellGroupData[{ |
---|
1064 | Cell[13834, 372, 549, 12, 41, "Input"], |
---|
1065 | Cell[14386, 386, 1522, 29, 268, "Output"] |
---|
1066 | }, Open ]], |
---|
1067 | Cell[CellGroupData[{ |
---|
1068 | Cell[15945, 420, 255, 6, 41, "Input"], |
---|
1069 | Cell[16203, 428, 129, 2, 40, "Output"] |
---|
1070 | }, Open ]], |
---|
1071 | Cell[CellGroupData[{ |
---|
1072 | Cell[16369, 435, 507, 11, 41, "Input"], |
---|
1073 | Cell[16879, 448, 354, 5, 40, "Output"] |
---|
1074 | }, Open ]], |
---|
1075 | Cell[CellGroupData[{ |
---|
1076 | Cell[17270, 458, 555, 12, 41, "Input"], |
---|
1077 | Cell[17828, 472, 348, 5, 40, "Output"] |
---|
1078 | }, Open ]], |
---|
1079 | Cell[CellGroupData[{ |
---|
1080 | Cell[18213, 482, 279, 6, 41, "Input"], |
---|
1081 | Cell[18495, 490, 326, 5, 40, "Output"] |
---|
1082 | }, Open ]], |
---|
1083 | Cell[18836, 498, 695, 14, 41, "Input"], |
---|
1084 | Cell[CellGroupData[{ |
---|
1085 | Cell[19556, 516, 353, 9, 41, "Input"], |
---|
1086 | Cell[19912, 527, 1500, 29, 268, "Output"] |
---|
1087 | }, Open ]], |
---|
1088 | Cell[CellGroupData[{ |
---|
1089 | Cell[21449, 561, 255, 6, 41, "Input"], |
---|
1090 | Cell[21707, 569, 101, 1, 40, "Output"] |
---|
1091 | }, Open ]], |
---|
1092 | Cell[CellGroupData[{ |
---|
1093 | Cell[21845, 575, 458, 10, 41, "Input"], |
---|
1094 | Cell[22306, 587, 335, 4, 40, "Output"] |
---|
1095 | }, Open ]], |
---|
1096 | Cell[22656, 594, 96, 1, 41, "Input"], |
---|
1097 | Cell[CellGroupData[{ |
---|
1098 | Cell[22777, 599, 463, 10, 41, "Input"], |
---|
1099 | Cell[23243, 611, 299, 4, 40, "Output"] |
---|
1100 | }, Open ]], |
---|
1101 | Cell[CellGroupData[{ |
---|
1102 | Cell[23579, 620, 226, 5, 41, "Input"], |
---|
1103 | Cell[23808, 627, 277, 4, 40, "Output"] |
---|
1104 | }, Open ]] |
---|
1105 | }, Open ]], |
---|
1106 | Cell[CellGroupData[{ |
---|
1107 | Cell[24134, 637, 107, 1, 75, "Section"], |
---|
1108 | Cell[24244, 640, 792, 15, 41, "Input"], |
---|
1109 | Cell[CellGroupData[{ |
---|
1110 | Cell[25061, 659, 549, 12, 41, "Input"], |
---|
1111 | Cell[25613, 673, 1535, 30, 268, "Output"] |
---|
1112 | }, Open ]], |
---|
1113 | Cell[CellGroupData[{ |
---|
1114 | Cell[27185, 708, 255, 6, 41, "Input"], |
---|
1115 | Cell[27443, 716, 129, 2, 40, "Output"] |
---|
1116 | }, Open ]], |
---|
1117 | Cell[CellGroupData[{ |
---|
1118 | Cell[27609, 723, 507, 11, 41, "Input"], |
---|
1119 | Cell[28119, 736, 341, 5, 40, "Output"] |
---|
1120 | }, Open ]], |
---|
1121 | Cell[CellGroupData[{ |
---|
1122 | Cell[28497, 746, 555, 12, 41, "Input"], |
---|
1123 | Cell[29055, 760, 361, 5, 40, "Output"] |
---|
1124 | }, Open ]], |
---|
1125 | Cell[CellGroupData[{ |
---|
1126 | Cell[29453, 770, 279, 6, 41, "Input"], |
---|
1127 | Cell[29735, 778, 335, 5, 40, "Output"] |
---|
1128 | }, Open ]], |
---|
1129 | Cell[30085, 786, 697, 14, 41, "Input"], |
---|
1130 | Cell[CellGroupData[{ |
---|
1131 | Cell[30807, 804, 353, 9, 41, "Input"], |
---|
1132 | Cell[31163, 815, 1484, 29, 268, "Output"] |
---|
1133 | }, Open ]], |
---|
1134 | Cell[CellGroupData[{ |
---|
1135 | Cell[32684, 849, 255, 6, 41, "Input"], |
---|
1136 | Cell[32942, 857, 99, 1, 40, "Output"] |
---|
1137 | }, Open ]], |
---|
1138 | Cell[CellGroupData[{ |
---|
1139 | Cell[33078, 863, 458, 10, 41, "Input"], |
---|
1140 | Cell[33539, 875, 335, 4, 40, "Output"] |
---|
1141 | }, Open ]], |
---|
1142 | Cell[33889, 882, 96, 1, 41, "Input"], |
---|
1143 | Cell[CellGroupData[{ |
---|
1144 | Cell[34010, 887, 463, 10, 41, "Input"], |
---|
1145 | Cell[34476, 899, 309, 4, 40, "Output"] |
---|
1146 | }, Open ]], |
---|
1147 | Cell[CellGroupData[{ |
---|
1148 | Cell[34822, 908, 226, 5, 41, "Input"], |
---|
1149 | Cell[35051, 915, 286, 4, 40, "Output"] |
---|
1150 | }, Open ]], |
---|
1151 | Cell[CellGroupData[{ |
---|
1152 | Cell[35374, 924, 1232, 33, 122, "Input"], |
---|
1153 | Cell[36609, 959, 945, 23, 265, "Output"] |
---|
1154 | }, Open ]] |
---|
1155 | }, Open ]] |
---|
1156 | } |
---|
1157 | ] |
---|
1158 | *) |
---|
1159 | |
---|
1160 | (* End of internal cache information *) |
---|