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

Solution 12065

Submitted on 28 Jan 2012 by Matt Fig

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	%% 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))