function [condmio] = hilbert_18(n) %dato n genera la matrici di hilbert di ordine n %definita da a(i,j)=1/(i+j-1) % e ne restituisce il condizionamento in norma 1 a=zeros(n); for i=1:n for j=1:n a(i,j)=1/(i+j-1); end end condmio=cond(a,1); end