risiv.m

% rise Pospeske ki so sfiltrirani zaradi boljse preglednosti

function risia(ime,tdif);
  clc;
  [xfilt,yfilt,vxfilt,vyfilt,vfilt,axfilt,ayfilt,afilt,t]=ata(ime,tdif);
  subplot(221), plot(t,afilt), title('Pospesek')
  subplot(223), plot(t,axfilt), title('Pospesek x')
  subplot(224), plot(t,vyfilt), title('Pospesek y')
end