; need to do @do_comp to run this ; o=!values.f_nan yrlist=[ [1601,o,o,o,o,o,o] , $ [1641,o,o,o,o,o,o] , $ [1669,o,o,o,o,o,o] , $ [1699,o,o,o,o,o,o] , $ [1816,o,o,o,o,o,o] , $ [1817,o,o,o,o,o,o] , $ [1641,1642,1643,1644,o,o,o] , $ [1666,1667,1668,1669,o,o,o] , $ [1695,1696,1697,1698,1699,o,o] , $ [1809,1810,1811,o,o,o,o] , $ [1832,1833,1834,1835,1836,1837,1838] , $ [1701,1702,o,o,o,o,o] , $ [1816,1817,1818,1819,o,o,o] ] yrlist=transpose(yrlist) titlist=[ reform(string(yrlist(0:5,0),format='(I4)')) , $ '1641-4' , '1666-9' , '1695-9' , '1809-11' , '1832-8' , '1701-2' , '1816-9' ] print,titlist help,yrlist,titlist ploton,100,/color8 .run,composite_col plotoff ;$mv idl.ps* /scratch14day/f055/tree