Given a positive integer, count the number of its positive divisors.



Task
Show the result for the first   100   positive integers.



Related task
  Tau number


tau: function [x] -> size factors x
 
loop split.every:20 1..100 => [
    print map & => [pad to :string tau & 3]
]