writeout.m.txt

来自「这是马尔可夫-蒙特卡罗算法的MATLAB源程序.」· 文本 代码 · 共 19 行

function WriteOut(fid,p,t)
% WriteOut(fid,p,t)
% Write time t and state p to space-delimited file with id fid

% Colin Fox, 12 Jan 2003

% write time, Likelihood, prior, DR
fprintf(fid,'%i ',t); % write time
fprintf(fid,'%1.3e ',p.logPrior,p.logLikelihood); % write log-prior and log-likelihood

ind = find(p.DR);    % linear index of non-zero elements of DR
r = full(p.DR(ind)); % the nonzero resistances

fprintf(fid,'%i ',size(p.DR)); % write size of DR matrix
for ir = [ind r]'
    fprintf(fid,'%i %3.1f ',ir); % write linear index and resistance
end

fprintf(fid,'\n'); % terminate line