function Ejemplo_1(f, I, a, b)
    real = I(a,b);
    disp([Barras(f, a, b, 1), abs(Barras(f, a, b, 1)-real); ...
         Regla_Trapezoidal(f, a, b, 1), abs(Regla_Trapezoidal(f, a, b, 1)-real) ; ...
         Simpson13(f, a, b, 2), abs(Simpson13(f, a, b, 2)-real); ...
         Simpson38(f, a, b, 1), abs(Simpson38(f, a, b, 1)-real) ]);
end
