1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
|
#!/usr/bin/perl -w
use strict;
use Chart::LinesPoints;
use Chart::Lines;
print "1..1\n";
my @bezugszeitraum = (
'2004-06-13 00:00:00+00',
'2004-06-14 00:00:00+00',
'2004-06-15 00:00:00+00',
'2004-06-16 00:00:00+00',
'2004-06-17 00:00:00+00',
'2004-06-18 00:00:00+00',
'2004-06-19 00:00:00+00',
'2004-06-20 00:00:00+00',
'2004-06-21 00:00:00+00',
'2004-06-22 00:00:00+00',
'2004-06-23 00:00:00+00',
'2004-06-24 00:00:00+00',
'2004-06-25 00:00:00+00',
'2004-06-26 00:00:00+00',
'2004-06-27 00:00:00+00',
'2004-06-28 00:00:00+00',
'2004-06-29 00:00:00+00',
'2004-06-30 00:00:00+00',
'2004-07-01 00:00:00+00',
'2004-07-02 00:00:00+00',
'2004-07-03 00:00:00+00',
'2004-07-04 00:00:00+00',
'2004-07-05 00:00:00+00',
'2004-07-06 00:00:00+00',
'2004-07-07 00:00:00+00',
'2004-07-08 00:00:00+00',
'2004-07-09 00:00:00+00',
'2004-07-10 00:00:00+00',
'2004-07-11 00:00:00+00',
'2004-07-12 00:00:00+00',
'2004-07-13 00:00:00+00',
'2004-07-14 00:00:00+00',
'2004-07-15 00:00:00+00',
'2004-07-16 00:00:00+00',
'2004-07-17 00:00:00+00',
'2004-07-18 00:00:00+00',
'2004-07-19 00:00:00+00',
'2004-07-20 00:00:00+00',
'2004-07-21 00:00:00+00',
'2004-07-22 00:00:00+00',
'2004-07-23 00:00:00+00',
'2004-07-24 00:00:00+00',
'2004-07-25 00:00:00+00',
'2004-07-26 00:00:00+00',
'2004-07-27 00:00:00+00',
'2004-07-28 00:00:00+00',
'2004-07-29 00:00:00+00',
'2004-07-30 00:00:00+00',
'2004-07-31 00:00:00+00',
'2004-08-01 00:00:00+00',
'2004-08-02 00:00:00+00',
'2004-08-03 00:00:00+00',
'2004-08-04 00:00:00+00',
'2004-08-05 00:00:00+00',
'2004-08-06 00:00:00+00',
'2004-08-07 00:00:00+00',
'2004-08-08 00:00:00+00',
'2004-08-09 00:00:00+00',
'2004-08-10 00:00:00+00',
'2004-08-11 00:00:00+00',
'2004-08-12 00:00:00+00',
'2004-08-13 00:00:00+00',
'2004-08-14 00:00:00+00',
'2004-08-15 00:00:00+00',
'2004-08-16 00:00:00+00',
'2004-08-17 00:00:00+00',
'2004-08-18 00:00:00+00',
'2004-08-19 00:00:00+00',
'2004-08-20 00:00:00+00',
'2004-08-21 00:00:00+00',
'2004-08-22 00:00:00+00',
'2004-08-23 00:00:00+00',
'2004-08-24 00:00:00+00',
'2004-08-25 00:00:00+00',
'2004-08-26 00:00:00+00',
'2004-08-27 00:00:00+00',
'2004-08-28 00:00:00+00',
'2004-08-29 00:00:00+00',
'2004-08-30 00:00:00+00',
'2004-08-31 00:00:00+00',
'2004-09-01 00:00:00+00',
'2004-09-02 00:00:00+00',
'2004-09-03 00:00:00+00',
'2004-09-04 00:00:00+00',
'2004-09-05 00:00:00+00',
'2004-09-06 00:00:00+00',
'2004-09-07 00:00:00+00',
'2004-09-08 00:00:00+00',
'2004-09-09 00:00:00+00',
'2004-09-10 00:00:00+00',
'2004-09-11 00:00:00+00',
'2004-09-12 00:00:00+00',
'2004-09-13 00:00:00+00',
'2004-09-14 00:00:00+00',
'2004-09-15 00:00:00+00',
'2004-09-16 00:00:00+00',
'2004-09-17 00:00:00+00',
'2004-09-18 00:00:00+00',
'2004-09-19 00:00:00+00',
'2004-09-20 00:00:00+00',
'2004-09-21 00:00:00+00',
'2004-09-22 00:00:00+00',
'2004-09-23 00:00:00+00',
'2004-09-24 00:00:00+00',
'2004-09-25 00:00:00+00',
'2004-09-26 00:00:00+00',
'2004-09-27 00:00:00+00',
'2004-09-28 00:00:00+00',
'2004-09-29 00:00:00+00',
'2004-09-30 00:00:00+00',
'2004-10-01 00:00:00+00',
'2004-10-02 00:00:00+00',
'2004-10-03 00:00:00+00',
'2004-10-04 00:00:00+00',
'2004-10-05 00:00:00+00',
'2004-10-06 00:00:00+00',
'2004-10-07 00:00:00+00',
'2004-10-08 00:00:00+00',
'2004-10-09 00:00:00+00',
'2004-10-10 00:00:00+00',
'2004-10-11 00:00:00+00',
'2004-10-12 00:00:00+00',
'2004-10-13 00:00:00+00',
'2004-10-14 00:00:00+00',
'2004-10-15 00:00:00+00',
'2004-10-16 00:00:00+00',
'2004-10-17 00:00:00+00',
'2004-10-18 00:00:00+00',
'2004-10-19 00:00:00+00',
'2004-10-20 00:00:00+00',
'2004-10-21 00:00:00+00',
'2004-10-22 00:00:00+00',
'2004-10-23 00:00:00+00',
'2004-10-24 00:00:00+00',
'2004-10-25 00:00:00+00',
'2004-10-26 00:00:00+00',
'2004-10-27 00:00:00+00',
'2004-10-28 00:00:00+00',
'2004-10-29 00:00:00+00',
'2004-10-30 00:00:00+00',
'2004-10-31 00:00:00+00',
'2004-11-01 00:00:00+00',
'2004-11-02 00:00:00+00',
'2004-11-03 00:00:00+00',
'2004-11-04 00:00:00+00',
'2004-11-05 00:00:00+00',
'2004-11-06 00:00:00+00',
'2004-11-07 00:00:00+00',
'2004-11-08 00:00:00+00',
'2004-11-09 00:00:00+00',
'2004-11-10 00:00:00+00',
'2004-11-11 00:00:00+00',
'2004-11-12 00:00:00+00',
'2004-11-13 00:00:00+00',
'2004-11-14 00:00:00+00',
'2004-11-15 00:00:00+00',
'2004-11-16 00:00:00+00',
'2004-11-17 00:00:00+00',
'2004-11-18 00:00:00+00',
'2004-11-19 00:00:00+00',
'2004-11-20 00:00:00+00',
'2004-11-21 00:00:00+00',
'2004-11-22 00:00:00+00',
'2004-11-23 00:00:00+00',
'2004-11-24 00:00:00+00',
'2004-11-25 00:00:00+00',
'2004-11-26 00:00:00+00',
'2004-11-27 00:00:00+00',
'2004-11-28 00:00:00+00',
'2004-11-29 00:00:00+00',
'2004-11-30 00:00:00+00',
'2004-12-01 00:00:00+00',
'2004-12-02 00:00:00+00',
'2004-12-03 00:00:00+00',
'2004-12-04 00:00:00+00',
'2004-12-05 00:00:00+00',
'2004-12-06 00:00:00+00',
'2004-12-07 00:00:00+00',
'2004-12-08 00:00:00+00',
'2004-12-09 00:00:00+00',
'2004-12-10 00:00:00+00',
'2004-12-11 00:00:00+00',
'2004-12-12 00:00:00+00',
'2004-12-13 00:00:00+00',
'2004-12-14 00:00:00+00',
'2004-12-15 00:00:00+00',
'2004-12-16 00:00:00+00',
'2004-12-17 00:00:00+00',
'2004-12-18 00:00:00+00',
'2004-12-19 00:00:00+00',
'2004-12-20 00:00:00+00',
'2004-12-21 00:00:00+00',
'2004-12-22 00:00:00+00',
'2004-12-23 00:00:00+00',
'2004-12-24 00:00:00+00',
'2004-12-25 00:00:00+00',
'2004-12-26 00:00:00+00',
'2004-12-27 00:00:00+00',
'2004-12-28 00:00:00+00',
'2004-12-29 00:00:00+00',
'2004-12-30 00:00:00+00',
'2004-12-31 00:00:00+00',
'2005-01-01 00:00:00+00',
'2005-01-02 00:00:00+00',
'2005-01-03 00:00:00+00',
'2005-01-04 00:00:00+00',
'2005-01-05 00:00:00+00',
'2005-01-06 00:00:00+00',
'2005-01-07 00:00:00+00',
'2005-01-08 00:00:00+00',
'2005-01-09 00:00:00+00',
'2005-01-10 00:00:00+00',
'2005-01-11 00:00:00+00',
'2005-01-12 00:00:00+00',
'2005-01-13 00:00:00+00',
'2005-01-17 00:00:00+00',
'2005-01-18 00:00:00+00',
'2005-01-25 00:00:00+00',
'2005-01-26 00:00:00+00',
'2005-01-28 00:00:00+00',
'2005-01-29 00:00:00+00',
'2005-01-31 00:00:00+00',
'2005-02-08 00:00:00+00',
'2005-02-09 00:00:00+00',
'2005-02-10 00:00:00+00',
'2005-02-11 00:00:00+00',
'2005-02-12 00:00:00+00',
'2005-02-13 00:00:00+00',
'2005-02-14 00:00:00+00',
'2005-02-15 00:00:00+00',
'2005-02-16 00:00:00+00',
'2005-02-17 00:00:00+00',
'2005-02-18 00:00:00+00',
'2005-02-19 00:00:00+00',
'2005-02-20 00:00:00+00',
'2005-02-21 00:00:00+00',
'2005-02-22 00:00:00+00',
'2005-02-23 00:00:00+00',
'2005-02-24 00:00:00+00',
'2005-02-25 00:00:00+00',
'2005-02-26 00:00:00+00',
'2005-02-27 00:00:00+00',
'2005-02-28 00:00:00+00',
'2005-03-01 00:00:00+00',
'2005-03-02 00:00:00+00',
'2005-03-03 00:00:00+00',
'2005-03-04 00:00:00+00',
'2005-03-05 00:00:00+00',
'2005-03-06 00:00:00+00',
'2005-03-07 00:00:00+00',
'2005-03-08 00:00:00+00',
'2005-03-09 00:00:00+00',
'2005-03-10 00:00:00+00',
'2005-03-11 00:00:00+00',
'2005-03-12 00:00:00+00',
'2005-03-13 00:00:00+00',
'2005-03-14 00:00:00+00',
'2005-03-15 00:00:00+00',
'2005-03-16 00:00:00+00',
'2005-03-17 00:00:00+00',
'2005-03-18 00:00:00+00',
'2005-03-19 00:00:00+00',
'2005-03-20 00:00:00+00',
'2005-03-21 00:00:00+00',
'2005-03-22 00:00:00+00',
'2005-03-23 00:00:00+00',
'2005-03-24 00:00:00+00',
'2005-03-25 00:00:00+00',
'2005-03-26 00:00:00+00',
'2005-03-27 00:00:00+00',
'2005-03-28 00:00:00+00',
'2005-03-29 00:00:00+00',
'2005-03-30 00:00:00+00',
'2005-03-31 00:00:00+00',
'2005-04-01 00:00:00+00',
'2005-04-02 00:00:00+00',
'2005-04-03 00:00:00+00',
'2005-04-04 00:00:00+00',
'2005-04-05 00:00:00+00',
'2005-04-06 00:00:00+00',
'2005-04-07 00:00:00+00',
'2005-04-08 00:00:00+00',
'2005-04-09 00:00:00+00',
'2005-04-10 00:00:00+00',
'2005-04-11 00:00:00+00',
'2005-04-12 00:00:00+00',
'2005-04-13 00:00:00+00',
'2005-04-14 00:00:00+00',
'2005-04-15 00:00:00+00',
'2005-04-16 00:00:00+00',
'2005-04-17 00:00:00+00',
'2005-04-18 00:00:00+00',
'2005-04-19 00:00:00+00',
'2005-04-20 00:00:00+00',
'2005-04-21 00:00:00+00',
'2005-04-22 00:00:00+00',
'2005-04-23 00:00:00+00',
'2005-04-24 00:00:00+00',
'2005-04-25 00:00:00+00',
'2005-04-26 00:00:00+00',
'2005-04-27 00:00:00+00',
'2005-04-28 00:00:00+00',
'2005-04-29 00:00:00+00',
'2005-04-30 00:00:00+00',
'2005-05-01 00:00:00+00',
'2005-05-02 00:00:00+00',
'2005-05-03 00:00:00+00',
'2005-05-04 00:00:00+00',
'2005-05-05 00:00:00+00',
'2005-05-06 00:00:00+00',
'2005-05-07 00:00:00+00',
'2005-05-08 00:00:00+00',
'2005-05-09 00:00:00+00',
'2005-05-10 00:00:00+00',
'2005-05-11 00:00:00+00',
'2005-05-12 00:00:00+00',
'2005-05-13 00:00:00+00',
'2005-05-14 00:00:00+00',
'2005-05-15 00:00:00+00',
'2005-05-16 00:00:00+00',
'2005-05-17 00:00:00+00',
'2005-05-18 00:00:00+00',
'2005-05-19 00:00:00+00',
'2005-05-20 00:00:00+00',
'2005-05-21 00:00:00+00',
'2005-05-22 00:00:00+00',
'2005-05-23 00:00:00+00',
'2005-05-24 00:00:00+00',
'2005-05-25 00:00:00+00',
'2005-05-26 00:00:00+00',
'2005-05-27 00:00:00+00',
'2005-05-28 00:00:00+00',
'2005-05-29 00:00:00+00',
'2005-05-30 00:00:00+00',
'2005-05-31 00:00:00+00',
'2005-06-01 00:00:00+00',
'2005-06-02 00:00:00+00',
'2005-06-03 00:00:00+00',
'2005-06-04 00:00:00+00',
'2005-06-05 00:00:00+00',
'2005-06-06 00:00:00+00',
);
my @obsepoch = (
81.8670764502497, 42.4188998589563, 100, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
100, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.6528982992017,
100, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 99.6180555555556, 100,
100, 100, 100, 100, 100, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652777777778,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.7223186393613, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9306037473976, 99.9306037473976, 99.9652898299202, 99.7570288094412, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202,
99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9306037473976, 99.9306037473976,
99.9306037473976, 99.9652898299202, 99.9652898299202, 99.9652898299202, 99.9306037473976, 99.9306037473976,
99.9306037473976, 99.9306037473976, 99.9306037473976, 99.9306037473976, 99.9306037473976, 99.9306037473976,
94.5176960444136, 100, 98.125, 100, 100, 100,
100, 100, 99.4444444444444, 100, 100, 100,
100, 100, 100, 100, 100, 100,
99.9652777777778, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
99.6180555555556, 100, 100, 100, 100, 100,
100, 100, 100, 99.6527777777778, 100, 100,
100, 100, 100, 100, 94.9494949494949, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 99.965241571081, 99.930483142162, 99.860966284324, 99.8262078554049,
99.7914494264859, 99.7566063977747, 99.6870653685674, 99.6175243393602, 99.547983310153, 99.4784422809458,
99.3741307371349, 99.5138888888889, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100, 100,
100, 100, 100, 100, 100,
);
my $g = Chart::LinesPoints->new( 700, 450 );
#my $g = Chart::Lines->new(700,450);
$g->add_dataset(@bezugszeitraum);
$g->add_dataset(@obsepoch);
$g->set( 'x_ticks' => 'vertical' );
$g->set( 'x_label' => ' Time' );
$g->set( 'y_label' => 'actual_nr_of_obsepoch / possible_nr' );
$g->set( 'legend' => 'none' );
$g->set( 'precision' => 0 );
$g->set( 'title' => 'DRES' );
$g->set( 'grey_background' => 'false' );
$g->set( 'max_val' => '100' );
$g->set( 'min_val' => '80' );
$g->set( 'pt_size' => '20' );
$g->set( 'brush_size' => '4' );
$g->set( 'skip_x_ticks' => '50' );
$g->png("samples/linespoints_6.png");
print "ok 1\n\n";
|
