No BSD License
k=0:11; b=[2 6 0]; a=[1 6 9]; f=4.^(k); y=filter(b,a,f); stem(k,y) xlabel('k');ylabel('y[k]')
Contact us at files@mathworks.com