RosettaCodeData/Task/Proper-divisors/MATLAB/proper-divisors.m

4 lines
51 B
Matlab

function D=pd(N)
K=1:ceil(N/2);
D=K(~(rem(N, K)));