fuliyejishuxishu.m

来自「自己编写的比较全面的故障诊断matlab函数程序」· M 代码 · 共 17 行

%**************************************************************************************************************************************************************
%   本程序为函数功能，目的是为求取一列信号数据的Fourier级数展开系数
%   输出数据中R(1,1)相当于a0，R(1,2)无意义，R(i,1)相当于a(i-1)，R(i,2)相当于b(i-1)
%      
%   中国北方发动机研究所试验测试中心  苏志霄   2006年10月
%**************************************************************************************************************************************************************
%
function R=fuliyejishuxishu(t,data);
T=max(t);
N=13;                                          %N为测点数目
for i=1:N;
    dataan=data.*cos(2*(i-1)*pi*data/T);
    databn=data.*sin(2*(i-1)*pi*data/T);
    R(i,1)=2/T*xinhaojifen(t,dataan);
    R(i,2)=2/T*xinhaojifen(t,databn);
end;