Файл:Свертка сигнала блока с самим собой2.gif

% Создать сложение двух прямоугольных импульсовпрозрачныйX = - 2,6 : 0,001 : 3 ; F1 = абс ( X ) <= 1,5 ; F2 = абс ( X ) <= 1,5 ; clfmkdir('tmp') ; [ tmp zero_offset ] = min ( abs ( X ));   SyncFrames = [ 1 раунд ( 18,67 * ( 1 : numel ( X )))]; интеграл = nan ( размер ( X )); кадр = 1 ; для offset_i = 1 : numel ( X ); смещение = X ( offset_i ); сдвиг = offset_i - zero_offset ; F2_shifted = circshift ( F2 , [ 0 shift ]); произведение = F2_shifted .* F1 ; интеграл ( offset_i ) = сумма ( произведение ) / numel ( X ) * ( X ( конец ) - X ( 1 )); если offset_i == SyncFrames ( кадр ) кадр = кадр + 1 ; площадь ( X , произведение , ' цвет лица ' , ' желтый ' ); удержание на графике ( X , F1 , 'b' , X , F2_shifted , 'r' , X , integral , 'k' , [ смещение смещение ], [ 0 2 ], 'k:' ) удержание вне оси изображение ось ([ - 2.1 2.1 0 1.1 ]) xlabel ( '\tau & t' ); сетка на легенде ( 'Площадь под f(\tau)g(t-\tau)' , 'f(\tau)' , 'g(t-\tau)' , '(f\astg)(t)' ); печать ( '-dpng' , '-r72' , sprintf ( 'tmp/conv_box_box_%06d.png' , offset_i ));                                                         оттянутый конец конец system ( '"C:\Program Files\ImageMagick-6.6.3-Q16\convert.exe" -layers Оптимизировать -delay 5 tmp/conv_box_box_*.png conv_box_box.gif' ); delete ( 'tmp/*' ); rmdir ( 'tmp' );