|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
t=Table[Mod[DivisorSigma[1, w], 30], {w, 1, 2700000}]; Table[Min[Flatten[Position[t, j]]], {j, 0, 29}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
fini,full,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|