Daniel@0: function c = center(x)
Daniel@0: if isempty(x)
Daniel@0:     c = [];
Daniel@0: else
Daniel@0:     c = x - repmat(mean(x),[size(x,1),1,1]);
Daniel@0: end