A045609 Numbers k that divide 10^k + 9^k.

1, 19, 361, 6859, 80161, 130321, 142253, 231059, 1523059, 1555207, 2476099, 2702807, 4390121, 28938121, 29548933, 47045881, 51353333, 83412299, 188190383, 338199259, 549824299, 561429727, 600165407, 893871739, 974837921

Offset

1,2

Links

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

Mathematica

Select[ Range[ 10^9 ], Mod[ PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ], # ] == 0 & ]

Crossrefs

Sequence in context: A208031 A370148 A171293 * A128360 A001029 A057685

Adjacent sequences: A045606 A045607 A045608 * A045610 A045611 A045612

Keyword

nonn

Author

David W. Wilson

Status

approved