$ od -c -N 50000 [phylum]<LISP>Lyric>Lispusers>PLOTEXAMPLES.TEDIT!1 0000000 X E R O X \t P L O T E X A M P L 0000020 E S \r 2 \r \r 4 \r \r 1 \r \r P L O T 0000040 E X A M P L E S \r 1 \r \r 4 \r \r 0000060 B y : J a n P e d e r s e 0000100 n ( P e d e r s e n . P A @ 0000120 X e r o x . c o m ) \r U s e s 0000140 : P L O T \r T h i s p a c k 0000160 a g e c o n t a i n s t w o 0000200 e x a m p l e s o f h o w 0000220 P L O T m i g h t b e 0000240 u s e d t o p r o d u c e 0000260 h i g h l e v e l p l o t t 0000300 i n g f a c i l i t i e s . 0000320 T h e f i r s t e x a m p l 0000340 e i s a h i s t o g r a m 0000360 p r i m i t i v e , a n d 0000400 t h e s e c o n d i s a 0000420 s c a t t e r p l o t t e r . 0000440 T h e c o d e i s c o m m 0000460 e n t e d , a n d e x p l o 0000500 i t s m o s t o f t h e 0000520 f a c i l i t i e s i n P L 0000540 O T . T h e s c a t t e r p 0000560 l o t e x a m p l e i s t 0000600 h e s i m p l e r o f t h 0000620 e t w o , a n d i s s u 0000640 g g e s t e d a s a s t a 0000660 r t i n g p o i n t . \r ( S C 0000700 A T P L O T y x p o 0000720 i n t l a b e l s y l a b e 0000740 l x l a b e l t i t l e 0000760 s y m b o l ) \t [ F u n c t 0001000 i o n ] \r G e n e r a t e s o 0001020 f a s c a t t e r p l o t 0001040 o f y v s x w h i c h 0001060 a r e n u m e r i c l i s t 0001100 s o f e q u a l l e n g t 0001120 h . I f x i n N I L , 0001140 t h e n y i s p l o t t e 0001160 d v s t h e i n t e g e r 0001200 s f r o m 1 t o ( L E N 0001220 G T H y ) . P o i n t l a b 0001240 e l s i s a l i s t o f 0001260 l a b e l s , o n e f o r 0001300 e a c h p o i n t p l o t 0001320 t e d . Y l a b e l a n d 0001340 x l a b e l a r e l a b e l 0001360 s f o r t h e x a n d 0001400 y a x i s r e s p e c t i v 0001420 e l y . T i t l e i s a 0001440 t i t l e f o r t h e s c 0001460 a t t e r p l o t . S y m b o 0001500 l i s t h e p l o t t i n 0001520 g s y m b o l t o u s e , 0001540 m u s t b e a B I T M A 0001560 P ; d e f a u l t s t o S 0001600 T A R . \r R e t u r n s a P 0001620 L O T . \r ( H I S T P L O T b 0001640 a t c h l a b e l s h a d e 0001660 ) \t [ F u n c t i o n ] \r B a t 0001700 c h i s a l i s t o f 0001720 n u m b e r s , o r a l i 0001740 s t o f p a i r s ( n u m 0001760 b e r . f r e q u e n c y ) 0002000 w h o s e h i s t o g r a m 0002020 w i l l b e d i s p l a y 0002040 e d . L a b e l i s a n 0002060 o p t i o n a l l a b e l f 0002100 o r t h o s e n u m b e r s 0002120 . S h a d e i s a s h a 0002140 d e t o u s e t o f i l 0002160 l t h e b a r s o f t h 0002200 e h i s t o g r a m ( d e f 0002220 a u l t s t o S H A D E 3 ) 0002240 . T h e c a s e o f a l 0002260 l e n t r i e s i n b a t 0002300 c h b e i n g i n t e g e r 0002320 s i s t r e a t e d s p e 0002340 c i a l l y . \r R e t u r n s 0002360 a P L O T . \0 \0 \0 \0 \0 003 ( L 0002400 I S T ( ( P A G E N I L ( 0002420 P A P E R S I Z E L E T T E R 0002440 S T A R T I N G P A G E # 2 0002460 0 0 ) ( 0 0 6 1 2 7 9 2 0002500 ) ( ( F O L I O N I L ( P 0002520 A R A L O O K S ( Q U A D C 0002540 E N T E R E D ) C H A R L O O 0002560 K S ( S U P E R S C R I P T 0002600 0 I N V I S I B L E O F F 0002620 S E L E C T P O I N T O F F 0002640 P R O T E C T E D O F F S I 0002660 Z E 1 0 F A M I L Y M O D 0002700 E R N O V E R L I N E O F F 0002720 S T R I K E O U T O F F U 0002740 N D E R L I N E O F F E X P 0002760 A N S I O N R E G U L A R S 0003000 L O P E R E G U L A R W E I 0003020 G H T M E D I U M I N V E R 0003040 T E D O F F U S E R I N F O 0003060 N I L S T Y L E N I L ) 0003100 F O R M A T I N F O N I L ) 0003120 ( 1 7 4 3 6 2 8 8 3 6 ) 0003140 N I L ) ( H E A D I N G N I 0003160 L ( H E A D I N G T Y P E R 0003200 U N N I N G H E A D ) ( 8 4 0003220 7 4 4 5 2 8 3 6 ) N I L ) 0003240 ( T E X T N I L N I L ( 0003260 8 4 9 6 4 5 6 6 0 0 ) N 0003300 I L ) ) ) ( P A G E N I L 0003320 ( P A P E R S I Z E N I L . 0003340 L E T T E R ) ( 0 0 6 1 0003360 2 7 9 2 ) ( ( F O L I O N 0003400 I L ( P A R A L O O K S ( Q 0003420 U A D C E N T E R E D ) C H 0003440 A R L O O K S ( S U P E R S C 0003460 R I P T 0 I N V I S I B L E 0003500 O F F S E L E C T P O I N T 0003520 O F F P R O T E C T E D O 0003540 F F S I Z E 1 0 F A M I L 0003560 Y M O D E R N O V E R L I N 0003600 E O F F S T R I K E O U T 0003620 O F F U N D E R L I N E O F 0003640 F E X P A N S I O N R E G U 0003660 L A R S L O P E R E G U L A 0003700 R W E I G H T M E D I U M 0003720 I N V E R T E D O F F U S E 0003740 R I N F O N I L S T Y L E 0003760 N I L ) F O R M A T I N F O 0004000 N I L ) ( 1 7 4 3 6 2 8 8 0004020 3 6 ) N I L ) ( H E A D I 0004040 N G N I L ( H E A D I N G T 0004060 Y P E R U N N I N G H E A D ) 0004100 ( 8 4 7 4 4 5 2 8 3 6 ) 0004120 N I L ) ( T E X T N I L 0004140 N I L ( 8 4 9 6 4 5 6 6 0004160 0 0 ) N I L ) ) ) ( P A G E 0004200 N I L ( P A P E R S I Z E 0004220 N I L . L E T T E R ) ( 0 0004240 0 6 1 2 7 9 2 ) ( ( F O 0004260 L I O N I L ( P A R A L O O 0004300 K S ( Q U A D C E N T E R E 0004320 D ) C H A R L O O K S ( S U 0004340 P E R S C R I P T 0 I N V I 0004360 S I B L E O F F S E L E C T 0004400 P O I N T O F F P R O T E C 0004420 T E D O F F S I Z E 1 0 0004440 F A M I L Y M O D E R N O V 0004460 E R L I N E O F F S T R I K 0004500 E O U T O F F U N D E R L I 0004520 N E O F F E X P A N S I O N 0004540 R E G U L A R S L O P E R 0004560 E G U L A R W E I G H T M E 0004600 D I U M I N V E R T E D O F 0004620 F U S E R I N F O N I L S 0004640 T Y L E N I L ) F O R M A T 0004660 I N F O N I L ) ( 1 7 4 3 0004700 6 2 8 8 3 6 ) N I L ) ( 0004720 H E A D I N G N I L ( H E A 0004740 D I N G T Y P E R U N N I N G 0004760 H E A D ) ( 8 4 7 4 4 5 2 0005000 8 3 6 ) N I L ) ( T E X T 0005020 N I L N I L ( 8 4 9 6 0005040 4 5 6 6 0 0 ) N I L ) ) ) ) 0005060 ) \0 \0 \0 \0 \0 005 \0 \a \0 . \0 \0 \0 \0 001 0005100 310 \0 \a \0 \0 \0 001 003 004 \0 \0 001 001 310 001 \0 0005120 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005140 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 0005160 \a \0 \0 \0 001 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005200 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005220 ( \0 \0 \0 \0 001 310 \0 \v \0 \0 \0 004 002 003 \0 0005240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005260 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 0005300 021 \0 \0 \0 004 002 003 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005320 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005340 ( \0 212 \0 212 001 8 \0 006 \0 \0 \0 004 002 003 \0 0005360 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005400 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 212 \0 212 001 8 \0 0005420 \0 \0 \0 \0 004 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005440 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005460 D \0 \0 \0 \0 001 310 \0 \0 \0 \0 \0 \0 003 004 \0 0005500 \0 001 001 310 001 \0 \0 \0 \0 \0 \0 \0 \v P A G 0005520 E H E A D I N G \0 \v R U N N I N 0005540 G H E A D \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005560 \0 \0 \0 \0 \0 \0 \0 \0 004 \0 005 \0 024 \0 006 M 0005600 O D E R N \0 \n \0 \0 \0 \0 \0 \0 001 \0 \0 0005620 024 \0 006 M O D E R N \0 \f \0 \0 \0 \0 \0 0005640 \0 002 \0 \0 024 \0 006 M O D E R N \0 006 \0 0005660 \0 \0 \0 \0 \0 \0 \0 \0 022 \0 004 L O G O \0 0005700 030 \0 \0 \0 \0 \0 \0 \0 \0 \0 024 \0 006 M O D 0005720 E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005740 \0 \0 002 \0 \a \0 \0 \0 005 \0 \0 \0 \0 004 \0 \0 0005760 \0 001 \0 \0 \0 \0 003 \0 \0 \0 \r \0 \0 \0 \0 005 0006000 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 002 \0 001 \0 \v 0006020 H R U L E . G E T F N 001 \0 024 \0 006 0006040 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0006060 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0006100 006 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0006120 E T F N 001 \0 024 \0 006 M O D E R N \0 0006140 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0006160 \0 005 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 002 \0 001 0006200 \0 \v H R U L E . G E T F N 001 \0 024 0006220 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0006240 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0006260 002 \0 005 \0 \0 \0 016 \0 \0 \0 \0 002 \0 \0 \0 \0 0006300 \0 002 \0 005 \0 \0 \0 002 \0 001 \0 \v H R U L 0006320 E . G E T F N 001 \0 024 \0 006 M O D E 0006340 R N \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 001 0006360 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 0006400 002 \0 001 \0 \v H R U L E . G E T F N 0006420 001 \0 024 \0 006 M O D E R N \0 \f \0 \0 \0 0006440 \0 \0 \0 002 \0 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0006460 \0 \0 \0 002 \0 004 \0 \0 \0 , \0 \0 \0 \0 005 \0 0006500 \0 \0 \0 \0 002 \0 003 \0 \0 \0 \v \0 \0 \0 \0 005 0006520 \0 \0 \0 \0 \0 002 \0 002 \0 \0 001 V \0 \0 \0 \0 0006540 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 \v \0 \0 \0 0006560 \0 005 \0 \0 \0 0 \0 \0 \0 \0 001 \0 \0 \0 \r \0 0006600 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 001 200 0006620 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0006640 020 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 0006660 \0 \n \0 \0 \0 \0 005 \0 \0 \0 021 \0 \0 \0 \0 001 0006700 \0 \0 \0 \r \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0006720 002 \0 \0 001 , \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0006740 \0 002 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 004 370 \0 0006760 , z 272 0006763