%Nearest Neighbor Weight Matrix Construction

%Assumes that a vector, NN, of nearest neighbors is loaded.

clear('M','W');

n = length(NN);

M(:,1) = [1:n]' ;

M(:,2) = NN ;

M(:,3) = ones(n,1) ;

W = spconvert(M) ;

[n k] = size(W);

if k<n
   
   for i = k+1:n
      
      W(:,i) = zeros(n,1) ;
      
   end
   
end