Home > tt2 > misc > lars.m

lars

PURPOSE ^

The dimension is p^2 (thus w

SYNOPSIS ^

function [y]=lars(p,ind,mat,rhs,n,d,smin,h,i0,j0)

DESCRIPTION ^

The dimension is p^2 (thus w

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function [y]=lars(p,ind,mat,rhs,n,d,smin,h,i0,j0)
0002 %The dimension is p^2 (thus w
0003 k0=p*p;
0004 x=zeros(k0,1);
0005 pp=2.^(0:d-1);
0006 for i=1:k0
0007    ix=ind(d*(i-1)+1:d*i);
0008    ix=dot((ix-1),pp); 
0009    x(i)=smin+h*ix;
0010 end
0011 mm=x(1)*mat{1};
0012 for i=2:numel(mat)
0013   mm=mm+x(i)*mat{i};
0014 end
0015    sol=mm \ rhs;
0016    sol=reshape(sol,n,n);
0017 y=sol(i0,j0);
0018 return
0019 end

Generated on Wed 08-Feb-2012 18:20:24 by m2html © 2005