A105978 Near-repdigit primes with at least two 6's as the repeated digit.

661, 6661, 666667, 66666667, 666666667, 6666666661, 66666666667, 666666666666666661, 66666666666666666667, 666666666666666666661, 6666666666666666666661, 66666666666666666666667, 6666666666666666666666666661

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..33 (* All terms with less than 1,000 digits *)

Example

a(2)=6661 is a term because all digits are equal to 6 except one.

Mathematica

Select[FromDigits/@Flatten[Table[PadLeft[{pd}, n, 6], {pd, {1, 7}}, {n, 3, 30}], 1], PrimeQ]//Sort (* Harvey P. Dale, Sep 01 2021 *)

Crossrefs

Cf. A105976, A105978, A105979, A105980, A105982, A365592, A365596, A365597, A365598.

Sequence in context: A243886 A145750 A243889 * A208180 A317396 A211839

Adjacent sequences: A105975 A105976 A105977 * A105979 A105980 A105981

Keyword

base,nonn

Author

Shyam Sunder Gupta, Apr 29 2005

Extensions

More terms from Harvey P. Dale, Sep 01 2021

Name clarified by Robert Price, Sep 10 2023

Status

approved