Matlab - Todos los números son positivos o pares

%% Insertar vector deseado

V = -2:2:10;

%% Comprobar los datos del vector

% Se generan vectores lógicos "Pos" y "Par" en cada caso

for i = 1 : length(V)

    if (V(i) >= 0)

        Pos(i) = logical(1);

    else

        Pos(i) = logical(0);

    end

    if (mod(V(i),2)==0)         % (*)

        Par(i) = logical(1);

    else

        Par(i) = logical(0);

    end

end

% (*) La función "mod" devuelve el resto después de la división.

% Por ello, si el número se divide entre 2 y el resto es 0, quiere decir

% que el número es par.

%% Mostrar mensajes al usuario

% Se muestra el mensaje si todos los elementos del vector "Pos" son 1

if (Pos)

    fprintf('Todos los números del vector son POSITIVOS\n\n');

end

% Se muestra el mensaje si todos los elementos del vector "Pos" son 1

if (Par)

    fprintf('Todos los números del vector son PARES\n\n');

end

% Se muestra el mensaje si todos los elementos del vector "Pos" y "Par"

% no son 1

if ~(Pos & Par)

    fprintf('Todos los números del vector no son POSITIVOS ni PARES\n\n');

end

a=[2,4,4];

positivos=vector(a);

function positivos=vector(v)

    positivos=1;

    n=length(v);

   for i=1:1:n

       for j=1:1:n

              if v(j)~=v(i)*2

                positivos=0;

              end

       end

   end

   if positivos ==1

           disp('Iguales')

       else

           disp('distinto')

   end

end

%% Insertar vector deseado

V = [2,4,4];

%% Programa

i_array = 1:length(V);

% Bucle For de N elementos

for i = i_array

    % Seleccionar elemento del vector

    NumBase = V(i);

    % Quitar número a analizar (NumBase) para segundo bucle

    idx = find(i_array == i);

    j_array = i_array;

    j_array(idx) = [];

    % Bucle For de N-1 elementos

    k = 1;

    for j = j_array

        if (V(j)/NumBase == 2)

            Doble(k) = logical(1);

        else

            Doble(k) = logical(0);

        end

        k = k + 1;

    end

    % Crear string array con resultados y mostrar mensaje

    if (Doble)

        Doble_str(i) = "YES";

        fprintf('El elemento Nº%d del vector V es la MITAD del resto de elementos\n\n',i);

    else

        Doble_str(i) = "NO";

    end

end

disp(Doble_str);