Massaging output of 50g's FACTORS command

[Han]

The code below basically changes the list into an array, then converts to a list of row vectors that are reverse-sorted, and then converted back to a matrix. Finally a transpose gets the desired form.

Code:

«
  OBJ→ 2. / { 2. } + →ARRY 
  →ROW →LIST REVLIST OBJ→ ROW→  @ delete this line of code if no sorting needed
  TRN →ROW DROP
  AXL SWAP AXL SWAP             @ delete this line of code if you do not have a preference for lists
»