Ho registrato un suono sotto forma di segnale elettrico, tabulando ogni tot decimillesimi di secondo la tensione elettrica corrispondente, e ho ottenuto una sequenza di informazioni che posso rappresentare con i punti del grafico sotto a sinistra. Da queste informazioni digitali sono risalito ad una curva continua che passa per tutti i punti, come quella a destra: è una spline cubica.
I tempi sono indicati con i numeri interi da 1 a 23. Le tensioni corrispondenti sono date dai valori:
-4, 0, 4, 6.7, 7, 3, 0, -1, 1, 3, 4.2, 3, -1, -5, -7.5, -7, -4, -1, -0.3, -2, -4.2, -5.3, -4.
Cerca di ottenere usando R (vedi) entrambe le rappresentazioni e calcola il numero che rappresenta
la tensione in corrispondenza del "tempo" 12.5.
source("http://macosa.dima.unige.it/r.R") V = c(-4,0,4,6.7,7,3,0,-1,1,3,4.2,3,-1,-5,-7.5,-7,-4,-1,-0.3,-2,-4.2,-5.3,-4) N = length(V); N # 23 t = 1:23 min(V); max(V) # -7.5 7 BF=3.5; HF=2.5 Plane(0,25,-8,8); Point(t,V, "blue") # fig. a sinistra # vedi Plane(0,25,-8,8); graph2(splinefun(t,V),1,23,"brown") # fig. a destra POINT(12.5,splinefun(t,V)(12.5), "cyan") splinefun(t,V)(12.5) # 1.192822 che arrotondo a 1.1