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

Solution 331955

Submitted on 10 Oct 2013 by Tobias Schäfer

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