Come è stata ottenuta la figura precedente con R (copia tutto e incolla):

T1 <- c(
0.3,36.5,
0.8,40.1,
1.3,39.7,
1.8,40.1,
2.3,39.6,
2.8,40.1,
3.3,39.8,
3.8,40.1,
4.3,39.6,
4.8,40.2,
5.3,39.8,
5.8,38.2,
6.3,40.3,
6.8,37.8,
7.3,36.3,
7.8,36.4,
8.3,36.4,
8.8,36.5,
9.3,36.3 )
T2 <- c(
0.3,36.5,
0.8,40,
1.3,39.6,
1.8,40.2,
2.3,39,
2.8,39.8,
3.3,38.3,
3.8,38.5,
4.3,37.9,
4.8,39.9,
5.3,39.6,
5.8,40.3,
6.3,39.8,
6.8,37.3,
7.3,36.9,
7.8,37.2,
8.3,36.7,
8.8,37,
9.3,36.6)
T3 <- c(
0.3,36.5,
0.8,40,
1.3,39.7,
1.8,40.5,
2.3,40,
2.8,40.9,
3.3,40.4,
3.8,40.8,
4.3,40.3,
4.8,41,
5.3,40.1,
5.8,40.6,
6.3,39.9,
6.8,38.3,
7.3,37.8,
7.8,38.2,
8.3,37.2,
8.8,37.4,
9.3,36.8)
source("http://macosa.dima.unige.it/r.R")                     # (vedi)
X1 <- xTab(T1); Y1 <- yTab(T1)
X2 <- xTab(T2); Y2 <- yTab(T2)
X3 <- xTab(T3); Y3 <- yTab(T3)
HF=2.5; BF=4; Piano(0,10,36,41)
spezzata(X1,Y1,"blue"); spezzata(X2,Y2,"red"); spezzata(X3,Y3,"brown")
# o:  Plane  polyline

I grafici seguenti possono essere realizzati con dei semplici script seguibile on line:  vedi  e  vedi.