A057842 Numbers n such that n | 6^n + 4^n + 2^n + 1.

1, 13, 4381, 560129, 606797

Offset

1,2

Links

Table of n, a(n) for n=1..5.

Mathematica

Select[ Range[ 10^6 ], Mod[ PowerMod[ 6, #, # ] + PowerMod[ 4, #, # ] + PowerMod[ 2, #, # ] + 1, # ] == 0 & ]

Crossrefs

Sequence in context: A270068 A174310 A362659 * A203676 A023345 A249941

Adjacent sequences: A057839 A057840 A057841 * A057843 A057844 A057845

Keyword

nonn

Author

Robert G. Wilson v, Nov 09 2000

Status

approved