mfbox_getmaskdata.m

来自「toolbox for spm 5 for data, model free a」· M 代码 · 共 16 行

function tX=mfbox_getmaskdata(X,tg,mask)
% Copyright by Peter Gruber 
% Signal Processing & Information Theory group
% Institute of Biophysics, University of Regensburg, Germany
% Homepage: http://research.fabian.theis.name
%           http://www-aglang.uni-regensburg.de
%
% This file is free software, subject to the 
% GNU GENERAL PUBLIC LICENSE, see gpl.txt

tX = zeros(length(mask(:),size(X,2)));
for i=1:size(X,2), tX(:,i) = accumarray(tg(:),X(:,i),[length(mask(:)),1],@mean); end
tX = tX(mask,:);

return