|
|
A147522
|
|
Minimal number such that a(n)*41^n is of the form x^2 + x + 41.
|
|
3
|
|
|
1, 1, 43, 6893, 1757233, 563636267, 209420753, 478130829203, 68506995922171, 245296117830341, 107670977147002963, 4137830996824703141, 16215855859012574521, 3891295582697539371727, 20259360308241533953897, 3150687184319350782852593, 574603643148719626677940181
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {}; Do[x = 0; While[Mod[x^2 + x + 41, 41^n] != 0, x++ ]; AppendTo[a, (x^2 + x + 41)/41^n}]; Print[{n, x, x^2 + x + 41, (x^2 + x + 41)/41^n}], {n, 1, 6}]; a
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|