lsxj.m

1． 该光盘包含了“信号与系统分析及MATLAB实现”一书的第六章所有程序； 2． 为了方便读者阅读程序

%画例6.7图的程序
function[f,k]=lsxj(f1,f2,k1,k2)
k=min(min(k1),min(k2)):max(max(k1),max(k2));     
s1=zeros(1,length(k));s2=s1;                         
s1(find((k>=min(k1))&(k<=max(k1))==1))=f1;        
s2(find((k>=min(k2))&(k<=max(k2))==1))=f2;       
f=s1+s2;                                                
stem(k,f,'filled')
axis([(min(min(k1),min(k2))-1),(max(max(k1),max(k2))+1),(min(f)-0.5),(max(f)+0.5)])