graphsetup    %  this just makes graphs pretty!


N = (1:30)';
h = 2.^(-N);

yp = (exp(1+h) - exp(1))./h;
err = abs(yp - exp(1));


figure(1)

loglog(h,err,'r*','MarkerSize',12), grid
xlabel('\fontsize{18} h'),ylabel('\fontsize{18} error')

format short e
disp(' ')
disp('        h          err          err/h ')
disp('   -------------------------------------')
disp([h err err./h])
disp(' ')




