function [NormData] = normalizeA(Data,dim)
%normalizes for each entry in the dimension dim. (so if dim is the time
%dimension, normalizes separately for each time point.)
%works for 2dimensional data only.
if dim==1
    Data = Data';
end
NormData = zeros(length(Data(:,1)),length(Data(1,:)));
for i = 1:length(Data(1,:))
    NormData(:,i) = normalize_var(Data(:,i));
end
if dim==1
    NormData = NormData';
end
end