Matlab - Ayuda con programa

perms(1:7)

n = 5;

result = extrae_medios(1:n);

matValues = 1:n;

for i = 1:length(result)

    matValues = [matValues; result{i}, zeros(1, n - length(result{i}))];

end

% Ceros donde no hay nada

result = unique(matValues, 'row')

% NaN donde no hay nada

result(result == 0) = NaN

% Guardado en una celda

result = mat2cell(result, ones(1, size(result, 1)), n);

result = cellfun(@(x) x(~isnan(x)), result, 'UniformOutput', false);

for i = 1:length(result)

    result{i}

end

function result = extrae_medios(base)

    result = {};

    if length(base) > 2

        for i = 2:(length(base)-1)

            temporal = base;

            temporal(i) = [];

            result = [result , temporal];

            if length(temporal) > 2

               result = [result, extrae_medios(temporal)];

            end

        end

    end

end

result =

     1     2     3     4     5

     1     2     3     5     0

     1     2     4     5     0

     1     2     5     0     0

     1     3     4     5     0

     1     3     5     0     0

     1     4     5     0     0

     1     5     0     0     0

result =

     1     2     3     4     5

     1     2     3     5   NaN

     1     2     4     5   NaN

     1     2     5   NaN   NaN

     1     3     4     5   NaN

     1     3     5   NaN   NaN

     1     4     5   NaN   NaN

     1     5   NaN   NaN   NaN

ans =

     1     2     3     4     5

ans =

     1     2     3     5

ans =

     1     2     4     5

ans =

     1     2     5

ans =

     1     3     4     5

ans =

     1     3     5

ans =

     1     4     5

ans =

     1     5