A057351 Numbers k that divide 4^k + 3^k + 1.

1, 2, 26, 338, 2054, 4394, 13282, 26702, 46306, 57122, 59566, 162266, 221446, 347126, 404293, 742586, 760318, 1301638, 2031406, 2109458, 2857114, 4512638, 4752982, 8340826, 8634886, 9653618, 10066654, 12819014, 19012162, 21263026, 25885054, 27422954, 34901542

Offset

1,2

Links

Michael S. Branicky, Table of n, a(n) for n = 1..82

Mathematica

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

Crossrefs

Cf. A074506.

Sequence in context: A096233 A363985 A126673 * A350436 A359924 A245999

Adjacent sequences: A057348 A057349 A057350 * A057352 A057353 A057354

Keyword

nonn,hard

Author

Robert G. Wilson v, Sep 22 2000

Extensions

a(18) from Hugo Pfoertner, Jan 05 2022

a(19)-a(33) from Michael S. Branicky, Jan 06 2022

Status

approved