stkbegin
stkxaxis(10,20,2,4,1,'Test')
x=[10:0.01:20];

y=10+10.*sin((x-10).*2.*pi);
stkaxis(1,5,0,20,10,2,0)
stkplot(1,5,x,y)
stktitle(1,5,'Stack Plot Number 1')

y=12.*sin((x-10).*4.*pi);
stkaxis(-2,5,-10,10,10,3,0)
stkplot(2,5,x,y)
stktitle(2,5,'Stack Plot Number 2  Default Pegging of Data')

y=12.*sin((x-10).*4.*pi);
stkaxis(-3,5,-10,10,10,3,0)
stkplot(3,5,x,y,'n')
stktitle(3,5,'Stack Plot Number 3  Nopeg')

y=1.5+ 0.5.*sin((x-10).*4.*pi);
stkaxis(4,5,1,2,0.5,4,2)
stkplot(4,5,x,y,'-c7')
stktitle(4,5,'Stack Plot Number 4  Non-Standard Color')

y=1.5+ 0.5.*sin((x-10).*4.*pi);
stkaxis(5,5,1,2,0.5,4,2)
stkplot(5,5,x,y,'+c7')
stktitle(5,5,'Stack Plot Number 5  Plot symbols')

stkpgttl('STKPLOT Test Plot 1')
stkend;


