No BSD License
k=0:10; b=[0 1 0.32]; a=[1 1 0.16]; f=(-0.5).^(k); y=filter(b,a,f); stem(k,y) xlabel('k');ylabel('y[k]')
Contact us at files@mathworks.com