172 <span class="comment">%     e1=mean(z(find(A==1),:).^2);</span>
0173 <span class="comment">%     e2=mean(z(find(A==2),:).^2);</span>
0174 <span class="comment">%     plot([e1',e2'], '.-'); legend('cluster A', 'cluster B'); title ('power per component');</span>
0175     
0176     
0177     <span class="keyword">if</span> 0 
0178         figure(105); clf
0179         subplot 211;
0180         <a href="nt_sgram.html" class="code" title="function [s,f,t]=nt_sgram(x,window,noverlap,nfft,sr,flags)">nt_sgram</