This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A166581 #18 Nov 01 2022 15:25:54 %S A166581 2333,3331,5333,7333,10333,13331,13337,13339,16333,17333,19333,20333, %T A166581 23333,23339,29333,31333,33301,33311,33317,33329,33331,33343,33347, %U A166581 33349,33353,33359,33377,33391,38333,41333,43331,49333,50333,55333 %N A166581 Primes containing the string 333. %H A166581 Vincenzo Librandi, <a href="/A166581/b166581.txt">Table of n, a(n) for n = 1..1000</a> %F A166581 a(n) ~ n log n. - _Charles R Greathouse IV_, Nov 01 2022 %t A166581 p333Q[n_] := Module[{idn = IntegerDigits[n]}, MemberQ[Partition[idn, 3, 1], {3, 3, 3}]]; Select[Prime[Range[20000]], p333Q] (* _Vincenzo Librandi_ Sep 14 2012 *) %Y A166581 Cf. A166571-A166573, A166579, A166580, A166582. %K A166581 nonn,base %O A166581 1,1 %A A166581 _Vincenzo Librandi_, Nov 01 2009