Problem 85. Remove the polynomials that have positive real elements of their roots.

Solution 107869

Submitted on 8 Jul 2012 by Dirk Engel

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

Cris Luengo on 14 Jul 2012

This removes only polinomials if all the roots are positive. Should read 'all' instead of 'any' here.

Test	Status	Code Input and Output
1	Pass	%% in = {[1 2 1],[1 -1],[1 1],[1 53 6]}; out_correct = {[1 2 1],[1 1],[1 53 6]}; assert(isequal(find_stable(in),out_correct))
2	Pass	%% in = {[1 1],[1 -1]}; out_correct = {[1 1]}; assert(isequal(find_stable(in),out_correct))
3	Pass	%% in = {[1 0 1],[2 -5 2],[2 5 2]}; out_correct = {[1 0 1],[2 5 2]}; assert(isequal(find_stable(in),out_correct))

Test

Status

Code Input and Output

Pass

%% in = {[1 2 1],[1 -1],[1 1],[1 53 6]}; out_correct = {[1 2 1],[1 1],[1 53 6]}; assert(isequal(find_stable(in),out_correct))

Pass

%% in = {[1 1],[1 -1]}; out_correct = {[1 1]}; assert(isequal(find_stable(in),out_correct))

Pass

%% in = {[1 0 1],[2 -5 2],[2 5 2]}; out_correct = {[1 0 1],[2 5 2]}; assert(isequal(find_stable(in),out_correct))