|
楼主 |
发表于 2009-2-23 16:41
|
显示全部楼层
我的三角级数法合成轨道谱程序 matlab
这个程序还没有考虑误差的
fmin=0; fmax=0.3; t=10; ff=1/t; n=301; ww=(fmax-fmin)/n;
fai=unifrnd(0,2*pi); m1=1;
sww=zeros(1,301);
for k=0:0.0:0.3, sww(k)=sqrt(sw(k)*ww); end
m=zeros(1,100); w=zeros(1,100);
for k=1:100, m(k)=m1+(k-1/2)*ww; end
for x=1:100, w(x)=w(x)+sww(k)*cos(m(k)*x+fai); end
subplot(211); plot(linspace(0,10,length(w)),w,'r-');
y=fft(w,2048); p=40*(y.*conj(y))/2048; ff=0.5*(0:1023)/2048;
subplot(212); loglog(ff,p(1:1024),'k-')
[ 本帖最后由 ChaChing 于 2009-2-23 21:51 编辑 ] |
|