|
|
A087045
|
|
Indices k where A057176(k) = 1.
|
|
2
|
|
|
1, 4, 64, 400, 489, 519, 2164, 3589, 8703, 84761, 358837, 1463825, 1668392, 20471837, 31960443
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MAPLE
|
N := 10^5: A := array(0..N): A[0] := 1; for m from 1 to N do A[m] := add(A[j], j=0..modp(A[m-1], m)): od: a := NULL: for i from 0 to N do if A[i]=1 then a := a, i; fi; od; a;
|
|
CROSSREFS
|
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|