view general/funutils/nthret.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.

function X=nthret(I,F,varargin)
% nthret - Evaluate function and return Nth return value.
%
% Usage:
%
% if F is a function that returns M >= I values, then
%    X = nthret(N,F,...)
% evaluates [Z{1:N}]=F(...)
% and returns Z{N}.

Z=cell(I,1);
[Z{:}]=F(varargin{:});
X=Z{I};