login
A097013
Smallest x such that sigma(x) mod 30 = n.
3
24, 1, 21, 2, 3, 923521, 5, 4, 7, 18, 27, 2401, 6, 9, 13, 8, 217, 9604, 10, 1089, 19, 98, 91, 21609, 14, 14641, 28, 49, 12, 2614689
OFFSET
0,1
COMMENTS
Compare with A084303.
Row 30 of A074625 (apart from different ordering). - Michel Marcus, Dec 19 2013
MATHEMATICA
t=Table[Mod[DivisorSigma[1, w], 30], {w, 1, 2700000}]; Table[Min[Flatten[Position[t, j]]], {j, 0, 29}]
KEYWORD
fini,full,nonn
AUTHOR
Labos Elemer, Aug 19 2004
STATUS
approved