Come fare i grafici con R (vedi)
# Grafico di h source("http://macosa.dima.unige.it/r.R") k = function(t) sqrt(5*t/6) h = function(t) ifelse(t<0, 0, ifelse(t<480, k(t), 20)) BF=3; HF=2.5 graphF( h, -100,600, "blue") # scelta automatica della scala abovex("t"); abovey("h") # # Grafico di D(h) deriv(k,"t") # faccio il calcolo con R # 0.5*(5/6*(5*t/6)^-0.5) Dh = function(t) ifelse(t<0, 0,ifelse(t<480, 0.5*(5/6*(5*t/6)^-0.5),0) ) Plane(-100,600, 0,0.2) # scelgo io la scala (prendo anche un tratto a sinistra # di 0, per vedere cosa accade, ma non era richiesto) graph( Dh, -100,600, "blue") abovex("t"); abovey("Dh")