A167282 Primes containing 777 as a substring.

1777, 2777, 11777, 19777, 22777, 26777, 27773, 27779, 41777, 43777, 44777, 47777, 47779, 50777, 53777, 57773, 65777, 67777, 68777, 71777, 76777, 77711, 77713, 77719, 77723, 77731, 77743, 77747, 77761, 77773, 77783, 77797, 79777, 80777

Offset: 1

Author

Vincenzo Librandi, Nov 01 2009

Keywords

• nonn
• base

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A166571-A166573, A166579-A166582, A167281.

Programs

Mathematica

p777Q[n_] := Module[{idn=IntegerDigits[n]}, MemberQ[Partition[idn, 3, 1], {7, 7, 7}]]; Select[Prime[Range[10000]], p777Q] (* Vincenzo Librandi, Sep 15 2013 *)

Formula

a(n) ~ n log n. - Charles R Greathouse IV, Nov 01 2022