
0079 figure(3); clf
0080 subplot 211; nt_bsplot(z(:,1,:).^2); 
0081 ylabel(<span class="string">'power'</span>); title(<span class="string">'closest square'</span>);
0082 subplot 212; nt_bsplot(z(:,2,:).^2); 
0083 ylabel(<span class="string">'power'</span>); title(<span class="string">'second closest'</span>); 
0084 figure(4); clf
0085 plot(abs(D(2:end)))
0086 
0087 <span class="comment">%{</span>
0088 It may necessary to sort the components to ensure that the DC component
0089 does not come first.
0090 <s