function R = remove(D, n);

  R = [D(1:n-1) D(n+1:end)];
  
endfunction
