gusucode.com > 《模式识别与智能计算》matlab源代码 > 《模式识别与智能计算》matlab源代码/《模式识别与智能计算》部分函数的源程序/书程序/第12章/triangleplot.m

    function triangleplot(x)
[n1,n2]=size(x);
x=guiyi(x);
t=linspace(-pi,pi,100);
for i=1:n1 
       for k=1:100
           a1(i,k)=0;a2(i,k)=0;
           for j=2:2:n2
            a1(i,k)=a1(i,k)+x(i,j)*sin(j*t(k)/2);
           end
           for j=1:n2
              if 2*j+1>n2 
                  break
              else
                a2(i,k)=a2(i,k)+x(i,2*j+1)*cos(j*t(k));
              end
           end
       a(i,k)=x(i,1)/sqrt(2)+a1(i,k)+a2(i,k);
       end
   plot(t,a);hold on
end
xlabel('t');ylabel('F_x(t)');