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

Author

Shyam Sunder Gupta, Apr 29 2005

Keywords

• base
• nonn

Examples

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

Links

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

Crossrefs

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

Programs

Mathematica

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

Extensions

More terms from Harvey P. Dale, Sep 01 2021

Name clarified by Robert Price, Sep 10 2023