function [ Fx,Dx ] = filtra( x )
%FILTRA Andamento derivata di una serie di dati
% Dx: vettore derivata
% x: vettore dati
b=fir1(20,0.1); %Filtro passa basso
Fx=filtfilt(b,1,x);
Dx=diff(Fx); %Andamento derivata
