A166581 Primes containing the string 333.

2333, 3331, 5333, 7333, 10333, 13331, 13337, 13339, 16333, 17333, 19333, 20333, 23333, 23339, 29333, 31333, 33301, 33311, 33317, 33329, 33331, 33343, 33347, 33349, 33353, 33359, 33377, 33391, 38333, 41333, 43331, 49333, 50333, 55333

Offset

1,1

Links

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

Formula

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

Mathematica

p333Q[n_] :=  Module[{idn = IntegerDigits[n]}, MemberQ[Partition[idn, 3, 1], {3, 3, 3}]]; Select[Prime[Range[20000]], p333Q] (* Vincenzo Librandi Sep 14 2012 *)

Crossrefs

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

Sequence in context: A238175 A203344 A178552 * A237387 A212466 A205021

Adjacent sequences: A166578 A166579 A166580 * A166582 A166583 A166584

Keyword

nonn,base

Author

Vincenzo Librandi, Nov 01 2009

Status

approved