gray average

 for i=2:1:1535;for j=2:1:2046;imggray(i,j)=(imggray(i,j-1)+imggray(i,j+1)+imggray(i+1,j)+imggray(i-1,j))/4;endfor;endfor;