roots <- polyroot(c(5, 4, 3, 2, 1))

Quiero ordenar las raíces por orden ascendente de la parte imaginaria. Por defecto lasorta función @ lo ordena por orden creciente de la parte real. He leído el documento y todavía no sé cómo ajustar los argumentos o escribir el comando. ¿Alguien puede ayudar?