hht变换

来源:互联网 发布:盒饭网络销售怎么做 编辑:程序博客网 时间:2024/06/07 23:01
1.什么是HHT?
HHT就是先将信号进行经验模态分解(EMD分解),然后将分解后的每个IMF分量进行Hilbert变换,得到信号的时频属性的一种时频分析方法。


2.EMD分解的步骤。
 

EMD分解的流程图如下:
 



3.实例演示。
给定频率分别为10Hz和35Hz的两个正弦信号相叠加的复合信号,采样频率fs=2048Hz的信号,表达式如下:y=5sin(2*pi*10t)+5*sin(2*pi*35t)

(1)为了对比,先用fft对求上述信号的幅频和相频曲线
  1. function fftfenxi
  2. clear;clc;
  3. N=2048;
  4. %fft默认计算的信号是从0开始的
  5. t=linspace(1,2,N);deta=t(2)-t(1);1/deta
  6. x=5*sin(2*pi*10*t)+5*sin(2*pi*35*t);
  7. % N1=256;N2=512;w1=0.2*2*pi;w2=0.3*2*pi;w3=0.4*2*pi;
  8. % x=(t>=-200&t<=-200+N1*deta).*sin(w1*t)+(t>-200+N1*deta&t<=-200+N2*deta).*sin(w2*t)+(t>-200+N2*deta&t<=200).*sin(w3*t);
  9. y = x;
  10. m=0:N-1;
  11. f=1./(N*deta)*m;%可以查看课本就是这样定义横坐标频率范围的
  12. %下面计算的Y就是x(t)的傅里叶变换数值
  13. %Y=exp(i*4*pi*f).*fft(y)%将计算出来的频谱乘以exp(i*4*pi*f)得到频移后[-2,2]之间的频谱值
  14. Y=fft(y);
  15. z=sqrt(Y.*conj(Y));
  16. plot(f(1:100),z(1:100));
  17. title('幅频曲线')
  18. xiangwei=angle(Y);
  19. figure(2)
  20. plot(f,xiangwei)
  21. title('相频曲线')
  22. figure(3)
  23. plot(t,y,'r')
  24. %axis([-2,2,0,1.2])
  25. title('原始信号')
复制代码




(2)用Hilbert变换直接求该信号的瞬时频率
  1. clear;clc;clf;
  2. %假设待分析的函数是z=t^3
  3. N=2048;
  4. %fft默认计算的信号是从0开始的
  5. t=linspace(1,2,N);deta=t(2)-t(1);fs=1/deta;
  6. x=5*sin(2*pi*10*t)+5*sin(2*pi*35*t);
  7. z=x;
  8. hx=hilbert(z);
  9. xr=real(hx);xi=imag(hx);
  10. %计算瞬时振幅
  11. sz=sqrt(xr.^2+xi.^2);
  12. %计算瞬时相位
  13. sx=angle(hx);
  14. %计算瞬时频率
  15. dt=diff(t);
  16. dx=diff(sx);
  17. sp=dx./dt;
  18. plot(t(1:N-1),sp)
  19. title('瞬时频率')
复制代码

小结:傅里叶变换不能得到瞬时频率,即不能得到某个时刻的频率值。Hilbert变换是求取瞬时频率的方法,但如果只用Hilbert变换求出来的瞬时频率也不准确。(出现负频,实际上负频没有意义!)
(3)用HHT求取信号的时频谱与边际谱
  1. function HHT
  2. clear;clc;clf;
  3. N=2048;
  4. %fft默认计算的信号是从0开始的
  5. t=linspace(1,2,N);deta=t(2)-t(1);fs=1/deta;
  6. x=5*sin(2*pi*10*t)+5*sin(2*pi*35*t);
  7. z=x;
  8. c=emd(z);

  9. %计算每个IMF分量及最后一个剩余分量residual与原始信号的相关性
  10. [m,n]=size(c);
  11. for i=1:m;
  12. a=corrcoef(c(i,:),z);
  13. xg(i)=a(1,2);
  14. end
  15. xg;

  16. for i=1:m-1
  17. %--------------------------------------------------------------------
  18. %计算各IMF的方差贡献率
  19. %定义:方差为平方的均值减去均值的平方
  20. %均值的平方
  21. %imfp2=mean(c(i,:),2).^2
  22. %平方的均值
  23. %imf2p=mean(c(i,:).^2,2)
  24. %各个IMF的方差
  25. mse(i)=mean(c(i,:).^2,2)-mean(c(i,:),2).^2;
  26. end;
  27. mmse=sum(mse);
  28. for i=1:m-1
  29. mse(i)=mean(c(i,:).^2,2)-mean(c(i,:),2).^2; 
  30. %方差百分比,也就是方差贡献率
  31. mseb(i)=mse(i)/mmse*100;
  32. %显示各个IMF的方差和贡献率
  33. end;
  34. %画出每个IMF分量及最后一个剩余分量residual的图形
  35. figure(1)
  36. for i=1:m-1
  37. disp(['imf',int2str(i)]) ;disp([mse(i) mseb(i)]);
  38. end;
  39. subplot(m+1,1,1)
  40. plot(t,z)
  41. set(gca,'fontname','times New Roman')
  42. set(gca,'fontsize',14.0)
  43. ylabel(['signal','Amplitude'])

  44. for i=1:m-1
  45. subplot(m+1,1,i+1);
  46. set(gcf,'color','w')
  47. plot(t,c(i,:),'k')
  48. set(gca,'fontname','times New Roman')
  49. set(gca,'fontsize',14.0)
  50. ylabel(['imf',int2str(i)])
  51. end
  52. subplot(m+1,1,m+1);
  53. set(gcf,'color','w')
  54. plot(t,c(m,:),'k')
  55. set(gca,'fontname','times New Roman')
  56. set(gca,'fontsize',14.0)
  57. ylabel(['r',int2str(m-1)])

  58. %画出每个IMF分量及剩余分量residual的幅频曲线
  59. figure(2)
  60. subplot(m+1,1,1)
  61. set(gcf,'color','w')
  62. [f,z]=fftfenxi(t,z);
  63. plot(f,z,'k')
  64. set(gca,'fontname','times New Roman')
  65. set(gca,'fontsize',14.0)
  66. ylabel(['initial signal',int2str(m-1),'Amplitude'])

  67. for i=1:m-1
  68. subplot(m+1,1,i+1);
  69. set(gcf,'color','w')
  70. [f,z]=fftfenxi(t,c(i,:));
  71. plot(f,z,'k')
  72. set(gca,'fontname','times New Roman')
  73. set(gca,'fontsize',14.0)
  74. ylabel(['imf',int2str(i),'Amplitude'])
  75. end
  76. subplot(m+1,1,m+1);
  77. set(gcf,'color','w')
  78. [f,z]=fftfenxi(t,c(m,:));
  79. plot(f,z,'k')
  80. set(gca,'fontname','times New Roman')
  81. set(gca,'fontsize',14.0)
  82. ylabel(['r',int2str(m-1),'Amplitude'])

  83. hx=hilbert(z);
  84. xr=real(hx);xi=imag(hx);
  85. %计算瞬时振幅
  86. sz=sqrt(xr.^2+xi.^2);
  87. %计算瞬时相位
  88. sx=angle(hx);
  89. %计算瞬时频率
  90. dt=diff(t);
  91. dx=diff(sx);
  92. sp=dx./dt;
  93. figure(6)
  94. plot(t(1:N-1),sp)
  95. title('瞬时频率')

  96. %计算HHT时频谱和边际谱
  97. [A,fa,tt]=hhspectrum(c);
  98. [E,tt1]=toimage(A,fa,tt,length(tt));
  99. figure(3)
  100. disp_hhs(E,tt1) %二维图显示HHT时频谱,E是求得的HHT谱
  101. pause
  102. figure(4)
  103. for i=1:size(c,1)
  104. faa=fa(i,:);
  105. [FA,TT1]=meshgrid(faa,tt1);%三维图显示HHT时频图
  106. surf(FA,TT1,E)
  107. title('HHT时频谱三维显示')
  108. hold on
  109. end
  110. hold off
  111. E=flipud(E);
  112. for k=1:size(E,1)
  113. bjp(k)=sum(E(k,:))*1/fs; 
  114. end
  115. f=(1:N-2)/N*(fs/2);
  116. figure(5)
  117. plot(f,bjp);
  118. xlabel('频率 / Hz');
  119. ylabel('信号幅值');
  120. title('信号边际谱')%要求边际谱必须先对信号进行EMD分解

  121. function [A,f,tt] = hhspectrum(x,t,l,aff)

  122. error(nargchk(1,4,nargin));

  123. if nargin < 2

  124. t=1:size(x,2);

  125. end

  126. if nargin < 3

  127. l=1;

  128. end

  129. if nargin < 4

  130. aff = 0;

  131. end

  132. if min(size(x)) == 1
  133. if size(x,2) == 1
  134. x = x';
  135. if nargin < 2
  136. t = 1:size(x,2);
  137. end
  138. end
  139. Nmodes = 1;
  140. else
  141. Nmodes = size(x,1);
  142. end

  143. lt=length(t);

  144. tt=t((l+1):(lt-l));

  145. for i=1:Nmodes

  146. an(i,:)=hilbert(x(i,:)')';
  147. f(i,:)=instfreq(an(i,:)',tt,l)';
  148. A=abs(an(:,l+1:end-l));

  149. if aff
  150. disprog(i,Nmodes,max(Nmodes,100))
  151. end

  152. end


  153. function disp_hhs(im,t,inf)

  154. % DISP_HHS(im,t,inf)
  155. % displays in a new figure the spectrum contained in matrix "im"
  156. % (amplitudes in log).
  157. %
  158. % inputs : - im : image matrix (e.g., output of "toimage")
  159. % - t (optional) : time instants (e.g., output of "toimage") 
  160. % - inf (optional) : -dynamic range in dB (wrt max)
  161. % default : inf = -20
  162. %
  163. % utilisation : disp_hhs(im) ; disp_hhs(im,t) ; disp_hhs(im,inf) 
  164. % disp_hhs(im,t,inf)

  165. figure
  166. colormap(bone)
  167. colormap(1-colormap);

  168. if nargin==1
  169. inf=-20;
  170. t = 1:size(im,2);

  171. end

  172. if nargin == 2
  173. if length(t) == 1
  174. inf = t;
  175. t = 1:size(im,2);
  176. else
  177. inf = -20;
  178. end
  179. end

  180. if inf >= 0
  181. error('inf doit etre < 0')
  182. end

  183. M=max(max(im));

  184. im = log10(im/M+1e-300);

  185. inf=inf/10;


  186. imagesc(t,fliplr((1:size(im,1))/(2*size(im,1))),im,[inf,0]);
  187. set(gca,'YDir','normal')
  188. xlabel(['time'])
  189. ylabel(['normalized frequency'])
  190. title('Hilbert-Huang spectrum')
  191. function [f,z]=fftfenxi(t,y)
  192. L=length(t);N=2^nextpow2(L);
  193. %fft默认计算的信号是从0开始的
  194. t=linspace(t(1),t(L),N);deta=t(2)-t(1);
  195. m=0:N-1;
  196. f=1./(N*deta)*m;
  197. %下面计算的Y就是x(t)的傅里叶变换数值
  198. %Y=exp(i*4*pi*f).*fft(y)%将计算出来的频谱乘以exp(i*4*pi*f)得到频移后[-2,2]之间的频谱值
  199. Y=fft(y);
  200. z=sqrt(Y.*conj(Y));



复制代码




4.总结。

(1)边际谱与傅里叶谱的比较:
         意义不同:边际谱从统计意义上表征了整组数据每个频率点的累积幅值分布,而傅里叶频谱的某一点频率上的幅值表示在整个信号里有一个含有此频率的三角函数组分。
         作用不同:边际谱可以处理非平稳信号,如果信号中存在某一频率的能量出现,就表示一定有该频率的振动波出现,也就是说,边际谱能比较准确地反映信号的实际频率成分。而傅里叶变换只能处理平稳信号。


(2) HHT与Hilbert变换的比较: 
         Hilbert变换只是单纯地求信号的瞬时振幅,频率和相位,有可能出现没有意义的负频率;HHT变换先将信号进行EMD分解,得到的是各个不同尺度的分量,对每一个分量进行Hilbert变换后得到的是有实际意义的瞬时频率。