remmean.m

来自「这是一个关于盲源分离独立成分分析方法（ICA）的软件包」· M 代码 · 共 15 行

function [newVectors, meanValue] = remmean (vectors);

% [newVectors, meanValue] = remmean(vectors);
%
% Removes the mean of row vectors.
% Returns the new vectors and the mean.
%
%
% This function is needed by FASTICA and FASTICAG

% 15.3.1998

newVectors = zeros (size (vectors));
meanValue = mean (vectors')';
newVectors = vectors - meanValue * ones (1,size (vectors, 2));