1,1

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

Table[k = 0; While[!PrimeQ[(5^n - k)*5^n + 1], k++]; k, {n, 85}]

Cf. A200923, A200923.

Sequence in context: A200652 A276391 A119632 * A277790 A134761 A166752

Adjacent sequences: A201128 A201129 A201130 * A201132 A201133 A201134

nonn

Michel Lagneau, Nov 27 2011

approved