风力发电机组故障诊断系统源程序.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
x=x(1:25600); N=length(x); %读取时域信号 fs=2560; %采样频率 df=fs/N; %频率分辨率 t=(0:N-1)/fs; y=(abs(fft(x))).^2./N; %功率谱 y=y(1:1+N/2); %取一半的有用信号 f=(0:N/2)*2560/N; [d,e]=max(y(ceil(12/df):ceil(33/df))); %找到频域中12Hz到33Hz中最大值 v=(ceil(12/df)+e-2)*df; %最大值对应频率,即电机转频 f0=27*v/(102*5.25*5.25); f1=27*v/(102*5.25); f2=f0; f2z=27*24*24*v/(126*39*126); f4=27*v/102; f5=f1; f5z=24*27*v/(126*39); f7=f4; f8=v; ff3=27*v; ff2=27*v/5.25; ff1=27*v/(5.25*5.25); ff11=v; ff12=f7; ff21=f4; ff22=f5z; ff31=f1; ff32=f2z; ffr=[ff32,ff31,ff22,ff21,ff12,ff11]; %根据电机转频计算齿轮箱各个齿轮转频和三级啮合频率 a1=ceil((ff1-5)/df); a2=ceil((ff1+5)/df); b1=ceil((ff2-20)/df); b2=ceil((ff2+20)/df); c1=ceil((ff3-40)/df); c2=ceil((ff3+40)/df); %计算三级啮合频率附近区间的频谱对应点数范围 gxxx1=f(a1:a2); gyyy1=y(a1:a2); gxxx2=f(b1:b2); gyyy2=y(b1:b2); gxxx3=f(c1:c2); gyyy3=y(c1:c2); %频谱和时域对应赋值,Labview中画出频谱中各啮合频率出放大图 %变频程序 x=x(1:25600); N=length(x); %读取时域信号 fs=2560; %采样频率 df=fs/N; %频率分辨率 t=(0:N-1)/fs; %时间序列 y=(abs(fft(x))).^2./N; %功率谱 y=y(1:1+N/2); %取一半的有用信号 f=(0:N/2)*2560/N; [d,e]=max(y(ceil(12/df):ceil(33/df))); %找到频域中12Hz到33Hz中最大值 v=(ceil(12/df)+e-2)*df; %最大值对应频率,即电机转频 f0=27*v/(102*5.25*5.25); f1=27*v/(102*5.25); f2=f0; f2z=27*24*24*v/(126*39*126); f4=27*v/102; f5=f1; f5z=24*27*v/(126*39); f7=f4; f8=v; ff3=27*v; ff2=27*v/5.25; ff1=27*v/(5.25*5.25); ff11=v; ff12=f7; ff21=f4; ff22=f5z; ff31=f1; ff32=f2z; ffr=[ff32,ff31,ff22,ff21,ff12,ff11]; %根据电机转频计算齿轮箱各个齿轮转频和三级啮合频率 a11=ceil((ff1-5)/df); a12=ceil((ff1+5)/df); a21=ceil((ff2-5)/df); a22=ceil((ff2+5)/df); a31=ceil((ff3-5)/df); a32=ceil((ff3+5)/df); %找到三级啮合频率对应谱线 y1=zeros(1,9); fr1=zeros(1,9); y2=zeros(1,9); fr2=zeros(1,9); y3=zeros(1,9); fr3=zeros(1,9); [y1(1),fr1(1)]=max(y(a11:a1

文档评论(0)

zxli + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档