Solve Quartic Equation using root and deleting complex numbers from row

I have a 4x5 matrix, each row being the coeffecients of a quartic equation. I use the roots function to obtain a 4x4 matrix with the roots solution. Each row has two complex numbers, not always in the same column as another row. What is the best way to delete the complex numbers and keep the solutions on the same row, just reducing the cloumn size. For example taking: [1,2,1i,2i;3,4,3i,4i;5i,6i,5,6;7i,8i,7,8] and getting[1,2;3,4;5,6;7,8]

Answer 1

[Walter Roberson]

reshape(YourMatrix(imag(YourMatrix == 0)), 2, []) .'

[Chris Parry]

I get the following error when I run your code: "Subscript indices must either be real positive integers or logicals."

Any idea what I'm doing wrong?

[Matt J]

A typo

 imag(YourMatrix) == 0

[Chris Parry]

Ok, it gets rid of the complex numbers and generates a 4x2 matrix but instead of [1,2;3,4;5,6;7,8] i get [1,3;2,4;5,7;6,8] placing in column order instead of by rows. Any fixes?

[Matt J]

Pre-tranpose the matrix.

 YourMatrix=YourMatrix.';

 reshape(YourMatrix(imag(YourMatrix) == 0), 2, []).'

Better yet, organize your coefficients column-wise instead of row-wise and avoid transposing altogether.

[Richard Brown]

You need to work with the transpose

At = YourMatrix.';
reshape(At(imag(At) == 0), 2, []).'

edit: Looks like Matt and I were writing the same comment at the same time

[Chris Parry]

Awesome! Thanks!