%integralexempel
clear all
clf
disp('Integralen av funktionen: 2sin(x)-cos(x)/(1+x^2)');
a=input('Ange undre gräns: ');
b=input('Ange övre gräns: ');
int=quadl(@fkn,a,b);
disp(['Integralvärdet blir: ',num2str(int)]);
x=linspace(a,b,11);
y=fkn(x);
int2=trapz(x,y)
disp(['Med trapets får vi: ',num2str(int2)]);
fplot(@fkn,[a,b]);
hold on
plot(x,y,'r');
plot(x,y,'ko');
grid;
xlabel('x-axel');
ylabel('y-axel');
title('Integralexempel');

