A057298 Numbers n such that n | 7^n + 6^n + 1.

1, 2, 7, 35, 49, 86, 343, 539, 1309, 1715, 2195, 2401, 3698, 3941, 4753, 5047, 6077, 8869, 9374, 16807, 84035, 117649, 121079, 131219, 159014, 227642, 235426, 276115, 446299, 823543, 991613

Offset

1,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A342411 A231580 A182408 * A058941 A287327 A020066

Adjacent sequences: A057295 A057296 A057297 * A057299 A057300 A057301

Keyword

nonn

Author

Robert G. Wilson v, Sep 22 2000

Status

approved