average_array.m
View Options

			function [ averaged_array ] = average_array( array, history )

			averaged_array = zeros(size(array));

			if ~exist('history', 'var') \|\| isempty(history)
			history=length(array);
			end

			for i=1:size(array, 1)
			for j=1:size(array, 2)
			averaged_array(i,j) = sum(array(max(1,i-history):i,j))/length(array(max(1,i-history):i,j));
			end
			end


			end

R1252/simulation-code/average_array.mde096106547amaster