# Gyakorlat 2019. 05. 08. - Kidolgozando feladatok
clear
close all
output_precision(7)

disp("Gyakorlat 2019. 05. 08. - Kidolgozando feladatok");

disp("\n\
1. feladat\n\n\
Hatarozzuk meg a legjobb kozelito egyenest\n\
legkisebb negyzetek modszerevel!")

#########################################

disp("\n\
a)")
x = [0 1 2 3]
y = [1 3/2 2 2]

egyutthatok = polyfit(x, y, 1)

disp("\n\
Kozelito egyenes egyenlete:")
disp(egyutthatok(1))
disp(" * x + ")
disp(egyutthatok(2))

figure (1)
plot(x, y, "b+")
hold on 
plot(x, polyval(egyutthatok, x), "r")
title("1.a) feladat")
legend("meresi pontok", "legjobban illeszkedo egyenes")

#########################################

disp("\n\
b)")
x = [0 1 1 2 3]
y = [1 1 3/2 2 3]

egyutthatok = polyfit(x, y, 1)

disp("\n\
Kozelito egyenes egyenlete:")
disp(egyutthatok(1))
disp(" * x + ")
disp(egyutthatok(2))

figure (2)
plot(x, y, "b+")
hold on 
plot(x, polyval(egyutthatok, x), "r")
title("1.b) feladat")
legend("meresi pontok", "legjobban illeszkedo egyenes")

#########################################

disp("\n\
c)")
x = [0 1 2 3 4]
y = [1 3/2 1/2 1/2 0]

egyutthatok = polyfit(x, y, 1)

disp("\n\
Kozelito egyenes egyenlete:")
disp(egyutthatok(1))
disp(" * x + ")
disp(egyutthatok(2))

figure (3)
plot(x, y, "b+")
hold on 
plot(x, polyval(egyutthatok, x), "r")
title("1.c) feladat")
legend("meresi pontok", "legjobban illeszkedo egyenes")