Problem 660. Find a subset that divides the vector into equal halves

Solution 361483

Submitted on 28 Nov 2013 by Des Mc Manus

This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

Test	Status	Code Input and Output
1	Pass	%% x = [1 2 3 4 5 6 7]; xi = split_it(x); assert(isequal(sum(x(xi)),sum(x)/2));
2	Pass	%% x = [2 2 2 2 2 2]; xi = split_it(x); assert(isequal(sum(x(xi)),sum(x)/2));
3	Pass	%% x = [2 5 4 5 4]; xi = split_it(x); assert(isequal(sum(x(xi)),sum(x)/2));
4	Pass	%% x = [1 3 1 1 9 7]; xi = split_it(x); assert(isequal(sum(x(xi)),sum(x)/2));
5	Pass	%% x = primes(100); xi = split_it(x); assert(isequal(sum(x(xi)),sum(x)/2));