|
|
A057830
|
|
Numbers n such that n | 7^n + 5^n + 3^n +1.
|
|
0
|
|
|
1, 2, 4, 6, 12, 14, 28, 78, 98, 148, 196, 686, 689, 1014, 1372, 1751, 2724, 4134, 4802, 5154, 5819, 9604, 10094, 12246, 13182, 19306, 19796, 33614, 50764, 53742, 60578, 67228, 106708, 108146, 117404, 126409, 135142, 158732, 159198, 171366, 219102
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Table of n, a(n) for n=1..41.
|
|
MATHEMATICA
|
Select[ Range[ 10^6 ], Mod[ PowerMod[ 7, #, # ] + PowerMod[ 5, #, # ] + PowerMod[ 3, #, # ] + 1, # ] == 0 & ]
|
|
CROSSREFS
|
Sequence in context: A015636 A015663 A352393 * A013916 A141113 A324851
Adjacent sequences: A057827 A057828 A057829 * A057831 A057832 A057833
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v, Nov 08 2000
|
|
STATUS
|
approved
|
|
|
|