%% La suma no deberia ser conmutativa?

clear
clc

numerito = 1e-16;
a = 1 + numerito - 1
b = 1 - 1 + numerito


%% Graficar un polinomio (Ej 1.5.2 en las notas)

clear
clc
close all

x = linspace(0.99,1.01,1000); % tira de 1000 numeros entre 0.99 y 1.01

y = (x-1).^7; % factorizado
z = x.^7-7*x.^6+21*x.^5-35*x.^4+35*x.^3-21*x.^2+7*x-1; % obs: z = (x-1).^7

plot(x,y,'b','LineWidth',2)
axis tight
hold on
plot(x,z,'r','LineWidth',2)