unctions" class="code">function mm=lkurv(rho,eta,ak,n)</a>
0002 
0003 <span class="comment">%% LKURV - L-Curve Criterion</span>
0004 <span class="comment">%%         Estimation of maximum curvature and plotting</span>
0005 <span class="comment">%% index=lkurv(rho,eta[,alphas])</span>
0006 
0007 <span class="comment">%global hinv</span>
0008 <span class="comment">%cc=-(curvature(log(rho),log(eta),1,ak));</span>
0009 <span class="comment">%mm=ecke(rho,eta);</span>
0010 
0011 <span class="keyword">if</span> na