clear all
close all

%Για κάθε όνομα ορίζοναι ν σημεία του αρχικού και στη συνέχεια γίνεται
%κλήση στη συνάρτηση NaturalSpline που κατασκευάσαμε για τον υπολογισμό
%της φυσικής spline που παρεμβάλει τα ορισμένα σημεία. Κάθε γράμμα τυπώνεται σε
%ξεχωριστό γράφημα.

t=[1:10];
x=[-1 0 1 0 0 -0.5 -1 0 0.8 1.2];
y=[4 3.5 4 4.5 0.5 -0.5 0 0.5 -0.4 -0.1];

[t1,s1]=NaturalSpline(t,x);
[t2,s2]=NaturalSpline(t,y);

figure 1
hold on
plot(s1,s2)

d=[1:11];
x=[0 -0.5 0 0.6 1 0.7 0 -0.3 -0.1 0.1 -0.1];
y=[3 3.5 4 3.4 2 1.5 1.4 1.1 0.8 2.5 4];

[d1,s1]=NaturalSpline(d,x);
[d2,s2]=NaturalSpline(d,y);

figure 2
hold on
plot(s1,s2)

m=[1:10];
x=[0 0.5 1.5 3 2.8 3.2 5 4.8 5.5 5.8];
y=[0.5 1 0 3.5 4.2 1.5 3.5 4.2 0 2.5];

[m1,s1]=NaturalSpline(m,x);
[m2,s2]=NaturalSpline(m,y);

figure 3
hold on
plot(s1,s2)