load chmag.dat % <--Ladowanie punktow pomiarowych z pliku

im =chmag(:,1);

Us = chmag(:,2);

%zaznaczanie punktow pom. kolkami ->plot(im,Us,'o')

im1=0:0.5:12;

us1=239.984* atan(0.222*im1); % <---- przyblizenie f-cja arctg

plot(im,Us,'o', im1,us1,'g --')

axis([0,11.2,0,286])

ylabel('napiecie [V]')

xlabel('prad magnesowania [A]')

title('Aproksymacja ch-ki biegu jalowego silnika funkcja arcustangens ')

opis = ' o punkty pomiarowe';

opis1 = '----- us=239.984*arctg(0.222*im)';

text(3,60,opis)

text(3,40,opis1)

%~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

% plot ma automatyczne skalowanie osi

% aby zmienic skale na osiach (axis)

% miec opisy na osiach oraz tytul

%funkcje axis xlabel ylabel title musza byc po plot

%~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~