RosettaCodeData/Task/Digital-root/Jq/digital-root-2.jq

(
 "          i : [DR, P]",
 (961038, 923594037444, 670033, 448944221089
 ) as $i
   | "\($i|rjust(12)): \(digital_root($i))"
),
 "",
 "digital_root(\"1\" * 100000) => \(digital_root( "1" * 100000))"