demoyear

 DEMO demonstrates the use of TIMEPLT and STACKLBL.

0001 % DEMO demonstrates the use of TIMEPLT and STACKLBL.
0002 %
0003 
0004 % Call TIMEPLT specifying east and north velocity components
0005 % in the bottom panel, vector magnitude in the middle panel and a vector
0006 % stick plot in the top panel.  Note: each stick plot must have it's own panel
0007 
0008 
0009 %
0010 % Demonstrate for each time catagory.
0011 
0012 % years
0013   start=[1970 11 1 0 0 0];    %Gregorian start [yyyy mm dd hh mi sc]
0014   stop=[1996 2 1 0 0 0];
0015   jd=julian(start):100:julian(stop);
0016 
0017 % synthesize velocity data
0018   u=sin(.1*jd(:)/100).^2-.5;
0019   v=cos(.1*jd(:)/100);
0020 
0021 % convention: store velocity time series as complex vector:
0022   w=u+i*v;
0023 
0024   h=timeplt(jd,[u v abs(w) w],[1 1 2 3]);
0025   title('Demo of TIMEPLT and STACKLBL:  Years')
0026  
0027 % use STACKLBL to label each stack plot panel with title and units:
0028 
0029   stacklbl(h(1),'East + North velocity','m/s');
0030   stacklbl(h(2),'Speed','m/s');
0031   stacklbl(h(3),'Velocity Sticks','m/s');
0032 
0033