Il grafico a fianco rappresenta il consumo totale d'acqua di un piccolo paese nel corso di una giornata. In ascissa è indicata l'ora di rilevamento, in ordinata il consumo in migliaia di litri. Il consumo totale d'acqua nel corso di tale giornata è di 51500 litri. Quanto è stato il consumo medio orario d'acqua nel corso dell'intera giornata?   Qual è l'intervallo di due ore in cui è stato massimo il consumo d'acqua? Quant'acqua all'ora si è mediamente consumata in questo intervallo?   Qual è l'intervallo di due ore in cui è stato minimo il consumo d'acqua? Quant'acqua all'ora si è mediamente consumata in questo intervallo?

Tra le 2 e le 4 vengono consumati circa 1000 litri d'acqua, ossia 500 l/h. Tra le 18 e le 20 vengono consumati circa 10000 litri d'acqua, ossia 5000 l/h. Il grafico è stato realizzato con questo script.

# Per inciso, come è stato fatto il grafico seguente con R (vedi)
source("http://macosa.dima.unige.it/r.R")
x = c(00,01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,19,20,21,22,  23,24)
y = c(00,01,2,2.5,3,3.5,5,7,10,12,13.5,16,17,20,23,24,26,28,31,36,41,45,48,50.5,51.5)
BF=4; HF=3.6
Plane(0,24, 0,50)
abovey("migliaia di litri")
abovex("ora di rilevamento")
gridVC(0:25,"blue")
gridHC(seq(0,50,2),"blue")
abline(v=seq(0,25,5),col="blue")
abline(h=seq(0,50,10),col="blue")
splineL(x,y,"brown")