|
| |
|
|
A123061
|
|
Numbers n such that n divides 5^n - 3.
|
|
2
|
|
|
|
1, 2, 22, 77, 242, 371, 16102, 45727, 73447, 81286, 112277, 368237, 10191797, 13563742, 30958697, 389974222, 6171655457, 55606837682
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..18.
|
|
|
MATHEMATICA
|
Select[Range[1000000], IntegerQ[(PowerMod[5, #, # ]-3)/# ]&]
Do[If[IntegerQ[(PowerMod[5, n, n ]-3)/n], Print[n]], {n, 10^9}] - Ryan Propper (rpropper(AT)stanford.edu), Dec 30 2006
|
|
|
CROSSREFS
|
Cf. A067946 = numbers n such that n divides 5^n-1, A015951 = numbers n such that n | 5^n + 1.
Numbers n such that n divides 5^n + 3 are in A123052.
Sequence in context: A152995 A053940 A156480 * A050853 A172229 A212894
Adjacent sequences: A123058 A123059 A123060 * A123062 A123063 A123064
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Alexander Adamchuk, Nov 04 2006
|
|
|
EXTENSIONS
|
More terms from Farideh Firoozbakht, Nov 18 2006
Corrected and extended by Ryan Propper (rpropper(AT)stanford.edu), Jan 01 2007
Entry revised by N. J. A. Sloane, Jan 24 2007
a(18) from Lars Blomberg, Dec 12 2011
|
|
|
STATUS
|
approved
|
| |
|
|