% Input: i, vettore indici derivate
% Output: di, vettore derivate i-èsima di sin(x) in x=0
function di = derivate_sin(i)
  di = 0*i ;
  di(2:4:end) =  1 ;
  di(4:4:end) = -1 ;
end