|
0
|
1 %!PS-Adobe-3.0 EPSF-3.0
|
|
|
2 %%Title: Sequence Logo: rgWebLogo3
|
|
|
3 %%Creator: WebLogo 3.1 (2011-02-16)
|
|
|
4 %%CreationDate: 2011-10-15 16:48:55.480094
|
|
|
5 %%BoundingBox: 0 0 281 92
|
|
|
6 %%Pages: 0
|
|
|
7 %%DocumentFonts:
|
|
|
8 %%EndComments
|
|
|
9
|
|
|
10
|
|
|
11 % ---- VARIABLES ----
|
|
|
12
|
|
|
13 /True true def
|
|
|
14 /False false def
|
|
|
15
|
|
|
16 /debug False def
|
|
|
17
|
|
|
18 /logo_height 92 def
|
|
|
19 /logo_width 281 def
|
|
|
20 /logo_title (rgWebLogo3) def
|
|
|
21 /show_title True def
|
|
|
22
|
|
|
23 /logo_margin 2 def
|
|
|
24 /xaxis_label_height 6.0 def
|
|
|
25 /title_height 12 def
|
|
|
26 /stroke_width 0.5 def
|
|
|
27 /tic_length 5 def
|
|
|
28
|
|
|
29 /lines_per_logo 1 def
|
|
|
30 /line_width 277.6 def
|
|
|
31 /line_height 70.0 def
|
|
|
32 /line_margin_left 30.0 def
|
|
|
33 /line_margin_right 10 def
|
|
|
34 /line_margin_bottom 12.0 def
|
|
|
35 /line_margin_top 4 def
|
|
|
36
|
|
|
37 /stack_width 10.8 def
|
|
|
38 /stack_height 54.0 def
|
|
|
39 /stacks_per_line 22 def
|
|
|
40 /stack_margin 0.5 def
|
|
|
41
|
|
|
42 /show_yaxis True def
|
|
|
43 /show_yaxis_label True def
|
|
|
44 /yaxis_label (bits) def
|
|
|
45 /yaxis_scale 2.0 def % height in units
|
|
|
46 /yaxis_tic_interval 1.0 def % in units
|
|
|
47 /yaxis_minor_tic_interval 0.2 def % in units
|
|
|
48
|
|
|
49 /show_xaxis_label False def % True or False
|
|
|
50 /show_xaxis True def % True or False
|
|
|
51 /xaxis_label () def
|
|
|
52 /xaxis_tic_interval 1 def
|
|
|
53 /rotate_numbers False def % True or False
|
|
|
54 /number_interval 5 def
|
|
|
55 /show_ends False def
|
|
|
56 /end_type (-) def % d: DNA, p: PROTEIN, -: none
|
|
|
57
|
|
|
58 /show_fineprint True def
|
|
|
59 /fineprint (WebLogo 3.1) def
|
|
|
60 /logo_label () def
|
|
|
61
|
|
|
62 /show_boxes False def % True or False
|
|
|
63 /shrink false def % True or False
|
|
|
64 /shrink_fraction 0.5 def
|
|
|
65
|
|
|
66 /show_errorbars True def % True or False
|
|
|
67 /errorbar_fraction 0.9 def
|
|
|
68 /errorbar_width_fraction 0.25 def
|
|
|
69 /errorbar_gray 0.75 def
|
|
|
70
|
|
|
71 /fontsize 10 def
|
|
|
72 /small_fontsize 6 def
|
|
|
73 /title_fontsize 12 def
|
|
|
74 /number_fontsize 8 def
|
|
|
75
|
|
|
76
|
|
|
77 /UseCIEColor true def % Fix for issue 4
|
|
|
78 /default_color [ 0.0 0.0 0.0 ] def
|
|
|
79 /color_dict <<
|
|
|
80 (T) [ 1.0 0.549019607843 0.0 ]
|
|
|
81 (A) [ 1.0 0.549019607843 0.0 ]
|
|
|
82 (U) [ 1.0 0.549019607843 0.0 ]
|
|
|
83 (G) [ 0.0 0.0 1.0 ]
|
|
|
84 (C) [ 0.0 0.0 1.0 ]
|
|
|
85 >> def
|
|
|
86
|
|
|
87
|
|
|
88
|
|
|
89 % ---- DERIVED PARAMETERS ----
|
|
|
90
|
|
|
91 /char_width stack_width 2 stack_margin mul sub def
|
|
|
92 /char_width2 char_width 2 div def
|
|
|
93 /char_width4 char_width 4 div def
|
|
|
94
|
|
|
95 % movements to place 5'/N and 3'/C symbols
|
|
|
96 /leftEndDeltaX fontsize neg def
|
|
|
97 /leftEndDeltaY fontsize 1.25 mul neg def
|
|
|
98 /rightEndDeltaX fontsize 0.25 mul def
|
|
|
99 /rightEndDeltaY leftEndDeltaY def
|
|
|
100
|
|
|
101
|
|
|
102 % ---- PROCEDURES ----
|
|
|
103
|
|
|
104
|
|
|
105 /SetTitleFont {/ArialMT findfont title_fontsize scalefont setfont} bind def
|
|
|
106 /SetLogoFont {/Arial-BoldMT findfont char_width scalefont setfont} bind def
|
|
|
107 /SetStringFont{/ArialMT findfont fontsize scalefont setfont} bind def
|
|
|
108 /SetPrimeFont {/Symbol findfont fontsize scalefont setfont} bind def
|
|
|
109 /SetSmallFont {/ArialMT findfont small_fontsize scalefont setfont} bind def
|
|
|
110 /SetNumberFont {/ArialMT findfont number_fontsize scalefont setfont} bind def
|
|
|
111
|
|
|
112 /DrawBox { % width height
|
|
|
113 /hh exch def
|
|
|
114 /ww exch def
|
|
|
115 gsave
|
|
|
116 0.2 setlinewidth
|
|
|
117 %0.5 setgray
|
|
|
118
|
|
|
119 %0 0 moveto
|
|
|
120 hh 0 rlineto
|
|
|
121 0 ww rlineto
|
|
|
122 hh neg 0 rlineto
|
|
|
123 0 ww neg rlineto
|
|
|
124 stroke
|
|
|
125 grestore
|
|
|
126 } bind def
|
|
|
127
|
|
|
128
|
|
|
129 /StartLogo {
|
|
|
130 %save
|
|
|
131 gsave
|
|
|
132
|
|
|
133
|
|
|
134 debug {
|
|
|
135 logo_margin logo_margin moveto
|
|
|
136 logo_height logo_margin 2 mul sub
|
|
|
137 logo_width logo_margin 2 mul sub
|
|
|
138 DrawBox } if
|
|
|
139
|
|
|
140 show_title { DrawTitle } if
|
|
|
141 show_xaxis_label { DrawXaxisLable } if
|
|
|
142 show_fineprint { DrawFineprint } if
|
|
|
143 DrawLogoLabel
|
|
|
144
|
|
|
145
|
|
|
146 MoveToFirstLine
|
|
|
147 } bind def
|
|
|
148
|
|
|
149
|
|
|
150 /DrawLogoLabel {
|
|
|
151 gsave
|
|
|
152 SetTitleFont
|
|
|
153
|
|
|
154 logo_margin
|
|
|
155 logo_height title_fontsize sub logo_margin sub
|
|
|
156 moveto
|
|
|
157
|
|
|
158 debug { title_fontsize logo_label stringwidth pop DrawBox } if
|
|
|
159 0 title_fontsize 4 div rmoveto % Move up to baseline (approximatly)
|
|
|
160 logo_label show
|
|
|
161
|
|
|
162 grestore
|
|
|
163 } bind def
|
|
|
164
|
|
|
165 /DrawTitle {
|
|
|
166 gsave
|
|
|
167 SetTitleFont
|
|
|
168
|
|
|
169 logo_width 2 div logo_title stringwidth pop 2 div sub
|
|
|
170 logo_height title_fontsize sub logo_margin sub
|
|
|
171 moveto
|
|
|
172
|
|
|
173 debug { title_fontsize logo_title stringwidth pop DrawBox } if
|
|
|
174
|
|
|
175 0 title_fontsize 4 div rmoveto % Move up to baseline (approximatly)
|
|
|
176 logo_title show
|
|
|
177
|
|
|
178 grestore
|
|
|
179 } bind def
|
|
|
180
|
|
|
181 /DrawXaxisLable {
|
|
|
182 % Print X-axis label, bottom center
|
|
|
183 gsave
|
|
|
184 SetStringFont
|
|
|
185
|
|
|
186 logo_width 2 div xaxis_label stringwidth pop 2 div sub
|
|
|
187 xaxis_label_height logo_margin add fontsize sub
|
|
|
188 moveto
|
|
|
189 %fontsize 3 div
|
|
|
190
|
|
|
191 debug { fontsize xaxis_label stringwidth pop DrawBox } if
|
|
|
192
|
|
|
193 xaxis_label show
|
|
|
194
|
|
|
195 grestore
|
|
|
196 } bind def
|
|
|
197
|
|
|
198
|
|
|
199 /DrawFineprint {
|
|
|
200 gsave
|
|
|
201
|
|
|
202 SetSmallFont
|
|
|
203
|
|
|
204 logo_width fineprint stringwidth pop sub
|
|
|
205 logo_margin sub line_margin_right sub
|
|
|
206 logo_margin
|
|
|
207 moveto
|
|
|
208
|
|
|
209 debug { small_fontsize fineprint stringwidth pop DrawBox } if
|
|
|
210
|
|
|
211 fineprint show
|
|
|
212 grestore
|
|
|
213 } bind def
|
|
|
214
|
|
|
215 /MoveToFirstLine {
|
|
|
216 logo_margin
|
|
|
217 logo_height logo_margin sub title_height sub line_height sub
|
|
|
218 moveto
|
|
|
219 } bind def
|
|
|
220
|
|
|
221 /EndLogo {
|
|
|
222 grestore
|
|
|
223 %showpage
|
|
|
224 %restore
|
|
|
225 } bind def
|
|
|
226
|
|
|
227
|
|
|
228 /StartLine{
|
|
|
229 gsave
|
|
|
230
|
|
|
231 % Draw outer box
|
|
|
232 debug { line_height line_width DrawBox } if
|
|
|
233
|
|
|
234 % Move to lower left corner of content area
|
|
|
235 line_margin_left line_margin_bottom rmoveto
|
|
|
236
|
|
|
237 % Draw inner content box
|
|
|
238 debug {
|
|
|
239 line_height line_margin_bottom sub line_margin_top sub
|
|
|
240 line_width line_margin_left sub line_margin_right sub
|
|
|
241 DrawBox
|
|
|
242 } if
|
|
|
243
|
|
|
244 show_yaxis { DrawYaxis } if
|
|
|
245 show_xaxis { DrawLeftEnd } if
|
|
|
246
|
|
|
247 } bind def
|
|
|
248
|
|
|
249 /EndLine{
|
|
|
250 show_xaxis { DrawRightEnd } if
|
|
|
251 grestore
|
|
|
252 0 line_height neg rmoveto
|
|
|
253 } bind def
|
|
|
254
|
|
|
255
|
|
|
256 /DrawYaxis {
|
|
|
257 gsave
|
|
|
258 stack_margin neg 0 translate
|
|
|
259 DrawYaxisBar
|
|
|
260 DrawYaxisLabel
|
|
|
261 grestore
|
|
|
262 } bind def
|
|
|
263
|
|
|
264
|
|
|
265 /DrawYaxisBar {
|
|
|
266 gsave
|
|
|
267 stack_margin neg 0 rmoveto
|
|
|
268
|
|
|
269 SetNumberFont
|
|
|
270 stroke_width setlinewidth
|
|
|
271
|
|
|
272 /str 10 string def % string to hold number
|
|
|
273 /smallgap stack_margin def
|
|
|
274
|
|
|
275 % Draw first tic and bar
|
|
|
276 gsave
|
|
|
277 tic_length neg 0 rmoveto
|
|
|
278 tic_length 0 rlineto
|
|
|
279 0 stack_height rlineto
|
|
|
280 stroke
|
|
|
281 grestore
|
|
|
282
|
|
|
283 % Draw the tics
|
|
|
284 % initial increment limit proc for
|
|
|
285 0 yaxis_tic_interval yaxis_scale abs
|
|
|
286 {/loopnumber exch def
|
|
|
287
|
|
|
288 % convert the number coming from the loop to a string
|
|
|
289 % and find its width
|
|
|
290 loopnumber 10 str cvrs
|
|
|
291 /stringnumber exch def % string representing the number
|
|
|
292
|
|
|
293 stringnumber stringwidth pop
|
|
|
294 /numberwidth exch def % width of number to show
|
|
|
295
|
|
|
296 /halfnumberheight
|
|
|
297 stringnumber CharBoxHeight 2 div
|
|
|
298 def
|
|
|
299
|
|
|
300 gsave
|
|
|
301 numberwidth % move back width of number
|
|
|
302 neg loopnumber stack_height yaxis_scale div mul % shift on y axis
|
|
|
303 halfnumberheight sub % down half the digit
|
|
|
304 rmoveto % move back the width of the string
|
|
|
305
|
|
|
306 tic_length neg smallgap sub % Move back a bit more
|
|
|
307 0 rmoveto % move back the width of the tic
|
|
|
308
|
|
|
309 stringnumber show
|
|
|
310 smallgap 0 rmoveto % Make a small gap
|
|
|
311
|
|
|
312 % now show the tic mark
|
|
|
313 0 halfnumberheight rmoveto % shift up again
|
|
|
314 tic_length 0 rlineto
|
|
|
315 stroke
|
|
|
316 grestore
|
|
|
317 } for
|
|
|
318
|
|
|
319 % Draw the minor tics
|
|
|
320 % initial increment limit proc for
|
|
|
321 0 yaxis_minor_tic_interval yaxis_scale abs
|
|
|
322 {/loopnumber2 exch def
|
|
|
323 gsave
|
|
|
324 0
|
|
|
325 loopnumber2 stack_height yaxis_scale div mul
|
|
|
326 rmoveto
|
|
|
327
|
|
|
328 tic_length 2 div neg 0 rlineto
|
|
|
329 stroke
|
|
|
330 grestore
|
|
|
331 } for
|
|
|
332
|
|
|
333 grestore
|
|
|
334 } bind def
|
|
|
335
|
|
|
336 /DrawYaxisLabel {
|
|
|
337 gsave
|
|
|
338 SetStringFont
|
|
|
339
|
|
|
340 % How far we move left depends on the size of
|
|
|
341 % the tic labels.
|
|
|
342 /str 10 string def % string to hold number
|
|
|
343 yaxis_scale yaxis_tic_interval div cvi yaxis_tic_interval mul
|
|
|
344 str cvs stringwidth pop
|
|
|
345 tic_length 1.25 mul add neg
|
|
|
346
|
|
|
347 stack_height
|
|
|
348 yaxis_label stringwidth pop
|
|
|
349 sub 2 div
|
|
|
350
|
|
|
351 rmoveto
|
|
|
352 90 rotate
|
|
|
353
|
|
|
354 yaxis_label show
|
|
|
355 grestore
|
|
|
356 } bind def
|
|
|
357
|
|
|
358
|
|
|
359 %Take a single character and return the bounding box
|
|
|
360 /CharBox { % <char> CharBox <lx> <ly> <ux> <uy>
|
|
|
361 gsave
|
|
|
362 newpath
|
|
|
363 0 0 moveto
|
|
|
364 % take the character off the stack and use it here:
|
|
|
365 true charpath
|
|
|
366 flattenpath
|
|
|
367 pathbbox % compute bounding box of 1 pt. char => lx ly ux uy
|
|
|
368 % the path is here, but toss it away ...
|
|
|
369 grestore
|
|
|
370 } bind def
|
|
|
371
|
|
|
372
|
|
|
373 % The height of a characters bounding box
|
|
|
374 /CharBoxHeight { % <char> CharBoxHeight <num>
|
|
|
375 CharBox
|
|
|
376 exch pop sub neg exch pop
|
|
|
377 } bind def
|
|
|
378
|
|
|
379
|
|
|
380 % The width of a characters bounding box
|
|
|
381 /CharBoxWidth { % <char> CharBoxHeight <num>
|
|
|
382 CharBox
|
|
|
383 pop exch pop sub neg
|
|
|
384 } bind def
|
|
|
385
|
|
|
386
|
|
|
387 /DrawLeftEnd {
|
|
|
388 gsave
|
|
|
389 SetStringFont
|
|
|
390 leftEndDeltaX leftEndDeltaY rmoveto
|
|
|
391
|
|
|
392 show_ends {
|
|
|
393 debug { leftEndDeltaY neg leftEndDeltaX neg DrawBox } if
|
|
|
394 end_type (d) eq {(5) show DrawPrime} if
|
|
|
395 end_type (p) eq {(N) show} if
|
|
|
396 } if
|
|
|
397 grestore
|
|
|
398 } bind def
|
|
|
399
|
|
|
400 /DrawRightEnd {
|
|
|
401 gsave
|
|
|
402 SetStringFont
|
|
|
403 rightEndDeltaX rightEndDeltaY rmoveto
|
|
|
404
|
|
|
405 show_ends {
|
|
|
406 debug { rightEndDeltaY neg leftEndDeltaX neg DrawBox } if
|
|
|
407 end_type (d) eq {(3) show DrawPrime} if
|
|
|
408 end_type (p) eq {(C) show} if
|
|
|
409 } if
|
|
|
410 grestore
|
|
|
411 } bind def
|
|
|
412
|
|
|
413 /DrawPrime {
|
|
|
414 gsave
|
|
|
415 SetPrimeFont
|
|
|
416 (\242) show
|
|
|
417 grestore
|
|
|
418 } bind def
|
|
|
419
|
|
|
420
|
|
|
421 /StartStack { % <stackNumber> startstack
|
|
|
422 show_xaxis {DrawNumber}{pop} ifelse
|
|
|
423 gsave
|
|
|
424 debug { stack_height stack_width DrawBox } if
|
|
|
425
|
|
|
426 } bind def
|
|
|
427
|
|
|
428 /EndStack {
|
|
|
429 grestore
|
|
|
430 stack_width 0 rmoveto
|
|
|
431 } bind def
|
|
|
432
|
|
|
433
|
|
|
434 /DrawNumber { % number MakeNumber
|
|
|
435 /n exch def
|
|
|
436
|
|
|
437
|
|
|
438 gsave
|
|
|
439 %0 stack_margin neg rmoveto
|
|
|
440 stroke_width setlinewidth
|
|
|
441 stack_width 0 rlineto
|
|
|
442 stack_width 2 div neg 0 rmoveto
|
|
|
443
|
|
|
444 n () eq
|
|
|
445 { 0 tic_length 4 div neg rlineto }
|
|
|
446 { 0 tic_length 2 div neg rlineto }
|
|
|
447 ifelse
|
|
|
448
|
|
|
449 stroke
|
|
|
450 grestore
|
|
|
451
|
|
|
452
|
|
|
453
|
|
|
454 gsave
|
|
|
455 n
|
|
|
456 SetNumberFont
|
|
|
457 stack_width 2 div tic_length 2 div neg rmoveto
|
|
|
458
|
|
|
459 rotate_numbers {
|
|
|
460 90 rotate
|
|
|
461 dup stringwidth pop neg % find the length of the number
|
|
|
462 stack_margin sub % Move down a bit
|
|
|
463 (0) CharBoxHeight 2 div neg % left half height of numbers
|
|
|
464 rmoveto
|
|
|
465 show
|
|
|
466 } {
|
|
|
467 dup stringwidth pop neg 2 div number_fontsize neg rmoveto
|
|
|
468 show
|
|
|
469 } ifelse
|
|
|
470
|
|
|
471
|
|
|
472
|
|
|
473 grestore
|
|
|
474 } bind def
|
|
|
475
|
|
|
476
|
|
|
477
|
|
|
478 % Draw a character whose height is proportional to symbol bits
|
|
|
479 /ShowSymbol{ % interval character ShowSymbol
|
|
|
480 /char exch def
|
|
|
481 /interval exch def
|
|
|
482 /fraction_width exch def
|
|
|
483
|
|
|
484 /char_height
|
|
|
485 interval yaxis_scale div stack_height mul
|
|
|
486 stack_margin sub
|
|
|
487 dup
|
|
|
488 % if char_height is negative or very small replace with zero
|
|
|
489 % BUG FIX: This used to be '0.0 gt' but it seems that DrawHeight
|
|
|
490 % has a finite, non-zero minimum, which results in a rangecheck error
|
|
|
491 0.001 gt {}{pop 0.0} ifelse
|
|
|
492 def
|
|
|
493
|
|
|
494 char_height 0.0 gt {
|
|
|
495 show_boxes {
|
|
|
496 gsave
|
|
|
497 /ww char_height stack_margin add def
|
|
|
498 /hh stack_width def
|
|
|
499 stroke_width setlinewidth
|
|
|
500 hh 0 rlineto
|
|
|
501 0 ww rlineto
|
|
|
502 hh neg 0 rlineto
|
|
|
503 0 ww neg rlineto
|
|
|
504 stroke
|
|
|
505 grestore
|
|
|
506 } if
|
|
|
507
|
|
|
508 gsave
|
|
|
509 stack_margin stack_margin rmoveto
|
|
|
510 debug { char_height char_width DrawBox } if
|
|
|
511 1 fraction_width sub char_width mul 2 div 0 rmoveto
|
|
|
512 fraction_width char_width mul char_height char DrawChar
|
|
|
513 grestore
|
|
|
514
|
|
|
515 } if
|
|
|
516 0 interval yaxis_scale div stack_height mul rmoveto
|
|
|
517 } bind def
|
|
|
518
|
|
|
519
|
|
|
520 /DrawChar { % <width> <height> <char> ShowChar
|
|
|
521 /tc exch def % The character
|
|
|
522 /ysize exch def % the y size of the character
|
|
|
523 /xsize exch def % the x size of the character
|
|
|
524 /xmulfactor 1 def
|
|
|
525 /ymulfactor 1 def
|
|
|
526
|
|
|
527 gsave
|
|
|
528 SetLogoFont
|
|
|
529 tc SetColor
|
|
|
530
|
|
|
531 % IReplacementHack
|
|
|
532 % Deal with the lack of bars on the letter 'I' in Arial and Helvetica
|
|
|
533 % by replacing with 'I' from Courier.
|
|
|
534 tc (I) eq {
|
|
|
535 /Courier findfont char_width scalefont setfont
|
|
|
536 } if
|
|
|
537
|
|
|
538
|
|
|
539 shrink {
|
|
|
540 xsize 1 shrink_fraction sub 2 div mul
|
|
|
541 ysize 1 shrink_fraction sub 2 div mul rmoveto
|
|
|
542 shrink_fraction shrink_fraction scale
|
|
|
543 } if
|
|
|
544
|
|
|
545 % Calculate the font scaling factors
|
|
|
546 % Loop twice to catch small correction due to first scaling
|
|
|
547 2 {
|
|
|
548 gsave
|
|
|
549 xmulfactor ymulfactor scale
|
|
|
550
|
|
|
551 ysize % desired size of character in points
|
|
|
552 tc CharBoxHeight
|
|
|
553 dup 0.0 ne {
|
|
|
554 div % factor by which to scale up the character
|
|
|
555 /ymulfactor exch def
|
|
|
556 } {pop pop} ifelse
|
|
|
557
|
|
|
558 xsize % desired size of character in points
|
|
|
559 tc CharBoxWidth
|
|
|
560 dup 0.0 ne {
|
|
|
561 div % factor by which to scale up the character
|
|
|
562 /xmulfactor exch def
|
|
|
563 } {pop pop} ifelse
|
|
|
564 grestore
|
|
|
565 } repeat
|
|
|
566
|
|
|
567
|
|
|
568
|
|
|
569 % Draw the character
|
|
|
570 xmulfactor ymulfactor scale
|
|
|
571 % Move lower left corner of character to start point
|
|
|
572 tc CharBox pop pop % llx lly : Lower left corner
|
|
|
573 exch neg exch neg
|
|
|
574 rmoveto
|
|
|
575
|
|
|
576 tc show
|
|
|
577
|
|
|
578 grestore
|
|
|
579 } bind def
|
|
|
580
|
|
|
581 /SetColor{ % <char> SetColor
|
|
|
582 dup color_dict exch known {
|
|
|
583 color_dict exch get aload pop setrgbcolor
|
|
|
584 } {
|
|
|
585 pop
|
|
|
586 default_color aload pop setrgbcolor
|
|
|
587 } ifelse
|
|
|
588 } bind def
|
|
|
589
|
|
|
590
|
|
|
591 /DrawErrorbar{ % interval_down interval_up DrawErrorbar
|
|
|
592
|
|
|
593 gsave
|
|
|
594 /points_per_unit stack_height yaxis_scale div def
|
|
|
595 /height_up exch points_per_unit mul def
|
|
|
596 /height_down exch points_per_unit mul def
|
|
|
597
|
|
|
598 show_errorbars {
|
|
|
599
|
|
|
600 stroke_width setlinewidth
|
|
|
601 errorbar_gray setgray
|
|
|
602 stack_width 2 div 0 rmoveto
|
|
|
603
|
|
|
604 /errorbar_width char_width errorbar_width_fraction mul def
|
|
|
605 /errorbar_width2 errorbar_width 2 div def
|
|
|
606
|
|
|
607 gsave
|
|
|
608 0 height_down neg rmoveto
|
|
|
609 errorbar_width2 neg 0 rlineto
|
|
|
610 errorbar_width 0 rlineto
|
|
|
611 errorbar_width2 neg 0 rlineto
|
|
|
612 0 height_down errorbar_fraction mul rlineto
|
|
|
613 stroke
|
|
|
614 grestore
|
|
|
615
|
|
|
616 gsave
|
|
|
617 0 height_up rmoveto
|
|
|
618 errorbar_width2 neg 0 rlineto
|
|
|
619 errorbar_width 0 rlineto
|
|
|
620 errorbar_width2 neg 0 rlineto
|
|
|
621 0 height_up neg errorbar_fraction mul rlineto
|
|
|
622 stroke
|
|
|
623 grestore
|
|
|
624 } if
|
|
|
625
|
|
|
626 grestore
|
|
|
627
|
|
|
628 } bind def
|
|
|
629
|
|
|
630 /DrawErrorbarFirst{ % interval_down interval_up center DrawErrorbarFirst
|
|
|
631 gsave
|
|
|
632 /points_per_unit stack_height yaxis_scale div def
|
|
|
633 /center exch points_per_unit mul def
|
|
|
634
|
|
|
635 0 center rmoveto
|
|
|
636 DrawErrorbar
|
|
|
637 grestore
|
|
|
638 } bind def
|
|
|
639
|
|
|
640 %%EndProlog
|
|
|
641
|
|
|
642 %%Page: 1 1
|
|
|
643
|
|
|
644 % Example Data
|
|
|
645 %StartLogo
|
|
|
646 % StartLine
|
|
|
647 % (1) StartStack
|
|
|
648 % 1.2 (C) ShowSymbol
|
|
|
649 % 2.2 (I) ShowSymbol
|
|
|
650 % 0.5 0.5 DrawErrorbar
|
|
|
651 % EndStack
|
|
|
652 % (2) StartStack
|
|
|
653 % 0.5 (I) ShowSymbol
|
|
|
654 % 0.9 (L) ShowSymbol
|
|
|
655 % 1.0 (G) ShowSymbol
|
|
|
656 %
|
|
|
657 % 0.5 0.5 DrawErrorbar
|
|
|
658 % EndStack
|
|
|
659 % (234) StartStack
|
|
|
660 % EndStack
|
|
|
661 % (235) StartStack
|
|
|
662 % EndStack
|
|
|
663 % EndLine
|
|
|
664 %EndLogo
|
|
|
665
|
|
|
666 StartLogo
|
|
|
667
|
|
|
668 StartLine
|
|
|
669 () StartStack
|
|
|
670 1.000000 0.010108 (C) ShowSymbol
|
|
|
671 1.000000 0.040431 (G) ShowSymbol
|
|
|
672 1.000000 0.212261 (T) ShowSymbol
|
|
|
673 1.000000 0.232476 (A) ShowSymbol
|
|
|
674 0.232248 0.232248 DrawErrorbar
|
|
|
675 EndStack
|
|
|
676
|
|
|
677 () StartStack
|
|
|
678 1.000000 0.015152 (C) ShowSymbol
|
|
|
679 1.000000 0.045455 (G) ShowSymbol
|
|
|
680 1.000000 0.136365 (T) ShowSymbol
|
|
|
681 1.000000 0.174245 (A) ShowSymbol
|
|
|
682 0.218101 0.218101 DrawErrorbar
|
|
|
683 EndStack
|
|
|
684
|
|
|
685 () StartStack
|
|
|
686 1.000000 0.016616 (C) ShowSymbol
|
|
|
687 1.000000 0.037386 (G) ShowSymbol
|
|
|
688 1.000000 0.074773 (T) ShowSymbol
|
|
|
689 1.000000 0.074773 (A) ShowSymbol
|
|
|
690 0.169220 0.169220 DrawErrorbar
|
|
|
691 EndStack
|
|
|
692
|
|
|
693 () StartStack
|
|
|
694 1.000000 0.000000 (A) ShowSymbol
|
|
|
695 1.000000 0.038953 (G) ShowSymbol
|
|
|
696 1.000000 0.155812 (C) ShowSymbol
|
|
|
697 1.000000 0.759583 (T) ShowSymbol
|
|
|
698 0.326656 0.326656 DrawErrorbar
|
|
|
699 EndStack
|
|
|
700
|
|
|
701 (5) StartStack
|
|
|
702 1.000000 0.019459 (C) ShowSymbol
|
|
|
703 1.000000 0.038917 (A) ShowSymbol
|
|
|
704 1.000000 0.116752 (T) ShowSymbol
|
|
|
705 1.000000 0.778345 (G) ShowSymbol
|
|
|
706 0.350333 0.350333 DrawErrorbar
|
|
|
707 EndStack
|
|
|
708
|
|
|
709 () StartStack
|
|
|
710 1.000000 0.000000 (G) ShowSymbol
|
|
|
711 1.000000 0.021020 (A) ShowSymbol
|
|
|
712 1.000000 0.168160 (C) ShowSymbol
|
|
|
713 1.000000 0.840802 (T) ShowSymbol
|
|
|
714 0.325915 0.325915 DrawErrorbar
|
|
|
715 EndStack
|
|
|
716
|
|
|
717 () StartStack
|
|
|
718 1.000000 0.000000 (C) ShowSymbol
|
|
|
719 1.000000 0.083359 (T) ShowSymbol
|
|
|
720 1.000000 0.083359 (A) ShowSymbol
|
|
|
721 1.000000 0.854432 (G) ShowSymbol
|
|
|
722 0.347959 0.347959 DrawErrorbar
|
|
|
723 EndStack
|
|
|
724
|
|
|
725 () StartStack
|
|
|
726 1.000000 0.000000 (T) ShowSymbol
|
|
|
727 1.000000 0.070036 (G) ShowSymbol
|
|
|
728 1.000000 0.070036 (C) ShowSymbol
|
|
|
729 1.000000 1.003846 (A) ShowSymbol
|
|
|
730 0.356819 0.356819 DrawErrorbar
|
|
|
731 EndStack
|
|
|
732
|
|
|
733 () StartStack
|
|
|
734 1.000000 0.026714 (A) ShowSymbol
|
|
|
735 1.000000 0.040070 (G) ShowSymbol
|
|
|
736 1.000000 0.044523 (C) ShowSymbol
|
|
|
737 1.000000 0.106855 (T) ShowSymbol
|
|
|
738 0.196056 0.196056 DrawErrorbar
|
|
|
739 EndStack
|
|
|
740
|
|
|
741 (10) StartStack
|
|
|
742 1.000000 0.014496 (A) ShowSymbol
|
|
|
743 1.000000 0.016107 (G) ShowSymbol
|
|
|
744 1.000000 0.020939 (T) ShowSymbol
|
|
|
745 1.000000 0.027382 (C) ShowSymbol
|
|
|
746 0.078924 0.106593 DrawErrorbar
|
|
|
747 EndStack
|
|
|
748
|
|
|
749 () StartStack
|
|
|
750 1.000000 0.018308 (G) ShowSymbol
|
|
|
751 1.000000 0.032954 (A) ShowSymbol
|
|
|
752 1.000000 0.054923 (C) ShowSymbol
|
|
|
753 1.000000 0.073231 (T) ShowSymbol
|
|
|
754 0.164679 0.164679 DrawErrorbar
|
|
|
755 EndStack
|
|
|
756
|
|
|
757 () StartStack
|
|
|
758 1.000000 0.015253 (C) ShowSymbol
|
|
|
759 1.000000 0.021790 (T) ShowSymbol
|
|
|
760 1.000000 0.032685 (A) ShowSymbol
|
|
|
761 1.000000 0.037043 (G) ShowSymbol
|
|
|
762 0.106770 0.125094 DrawErrorbar
|
|
|
763 EndStack
|
|
|
764
|
|
|
765 () StartStack
|
|
|
766 1.000000 0.022457 (C) ShowSymbol
|
|
|
767 1.000000 0.028072 (T) ShowSymbol
|
|
|
768 1.000000 0.028072 (A) ShowSymbol
|
|
|
769 1.000000 0.058950 (G) ShowSymbol
|
|
|
770 0.137551 0.153378 DrawErrorbar
|
|
|
771 EndStack
|
|
|
772
|
|
|
773 () StartStack
|
|
|
774 1.000000 0.013621 (G) ShowSymbol
|
|
|
775 1.000000 0.021404 (C) ShowSymbol
|
|
|
776 1.000000 0.029188 (T) ShowSymbol
|
|
|
777 1.000000 0.031133 (A) ShowSymbol
|
|
|
778 0.095346 0.115803 DrawErrorbar
|
|
|
779 EndStack
|
|
|
780
|
|
|
781 (15) StartStack
|
|
|
782 1.000000 0.033669 (C) ShowSymbol
|
|
|
783 1.000000 0.067338 (A) ShowSymbol
|
|
|
784 1.000000 0.078561 (G) ShowSymbol
|
|
|
785 1.000000 0.370360 (T) ShowSymbol
|
|
|
786 0.303054 0.303054 DrawErrorbar
|
|
|
787 EndStack
|
|
|
788
|
|
|
789 () StartStack
|
|
|
790 1.000000 0.000000 (G) ShowSymbol
|
|
|
791 1.000000 0.056955 (T) ShowSymbol
|
|
|
792 1.000000 0.132896 (A) ShowSymbol
|
|
|
793 1.000000 0.740420 (C) ShowSymbol
|
|
|
794 0.331433 0.331433 DrawErrorbar
|
|
|
795 EndStack
|
|
|
796
|
|
|
797 () StartStack
|
|
|
798 1.000000 0.014884 (C) ShowSymbol
|
|
|
799 1.000000 0.044653 (T) ShowSymbol
|
|
|
800 1.000000 0.148844 (G) ShowSymbol
|
|
|
801 1.000000 0.520953 (A) ShowSymbol
|
|
|
802 0.310748 0.310748 DrawErrorbar
|
|
|
803 EndStack
|
|
|
804
|
|
|
805 () StartStack
|
|
|
806 1.000000 0.000000 (G) ShowSymbol
|
|
|
807 1.000000 0.088853 (T) ShowSymbol
|
|
|
808 1.000000 0.126932 (A) ShowSymbol
|
|
|
809 1.000000 0.406183 (C) ShowSymbol
|
|
|
810 0.268423 0.268423 DrawErrorbar
|
|
|
811 EndStack
|
|
|
812
|
|
|
813 () StartStack
|
|
|
814 1.000000 0.043760 (C) ShowSymbol
|
|
|
815 1.000000 0.065640 (T) ShowSymbol
|
|
|
816 1.000000 0.065640 (G) ShowSymbol
|
|
|
817 1.000000 0.361019 (A) ShowSymbol
|
|
|
818 0.304415 0.304415 DrawErrorbar
|
|
|
819 EndStack
|
|
|
820
|
|
|
821 (20) StartStack
|
|
|
822 1.000000 0.021502 (G) ShowSymbol
|
|
|
823 1.000000 0.027646 (C) ShowSymbol
|
|
|
824 1.000000 0.036861 (A) ShowSymbol
|
|
|
825 1.000000 0.064506 (T) ShowSymbol
|
|
|
826 0.150515 0.158545 DrawErrorbar
|
|
|
827 EndStack
|
|
|
828
|
|
|
829 () StartStack
|
|
|
830 1.000000 0.000000 (G) ShowSymbol
|
|
|
831 1.000000 0.015671 (C) ShowSymbol
|
|
|
832 1.000000 0.282073 (A) ShowSymbol
|
|
|
833 1.000000 0.470122 (T) ShowSymbol
|
|
|
834 0.247172 0.247172 DrawErrorbar
|
|
|
835 EndStack
|
|
|
836
|
|
|
837 () StartStack
|
|
|
838 1.000000 0.022864 (G) ShowSymbol
|
|
|
839 1.000000 0.040011 (C) ShowSymbol
|
|
|
840 1.000000 0.080022 (A) ShowSymbol
|
|
|
841 1.000000 0.137181 (T) ShowSymbol
|
|
|
842 0.209363 0.209363 DrawErrorbar
|
|
|
843 EndStack
|
|
|
844
|
|
|
845 EndLine
|
|
|
846
|
|
|
847 EndLogo
|
|
|
848
|
|
|
849
|
|
|
850 %%EOF
|
|
|
851
|
