Среднее арифметическое выделенного куска периодической функции

%в случае, если размер окна четный, увеличиваем его на 1 для симметрии;
window = 5;
if(mod(window,2)==0)
    window=window+1;
end
hw=(window-1)/2; %размах окна влево и вправо от текущей позиции
   
n=length(oscil);
result=zeros(n,1);
result(1)=oscil(1);  %первый элемент берем из исходного массива oscil как есть
 
for i=2:n              %организовываем цикл по числу элементов
    init_sum = 0;
    if(i<=hw)        %если индекс меньше половины окна, мы находимся в начале массива, 
                           %нужно брать окно меньшего размера
        k1=1;         %в качестве начала окна берем первый элемент
        k2=2*i-1;    %конец окна 
        z=k2;          %текущий размер окна
    elseif (i+hw>n) %если индекс+половина окна больше n - мы приближаемся к концу массива и размер окна
                            %также нужно уменьшать
        k1=i-n+i;     %начало окна 
        k2=n;          %конец окна - последний элемент массива
        z=k2-k1;     %размер окна
    else                 %если первые два условия не выполняются, мы в середине массива
        k1=i-hw;
        k2=i+hw;
        z=window;
    end
    
    for j=k1:k2                          %организуем цикл от начала до конца окна
       init_sum=init_sum+oscil(j); %складываем все элементы
    end
    result(i)=init_sum/(z);        %и делим на текущий размер окна
end

init_sum=init_sum+abs(oscil(j)); %складываем все элементы