A243530 Prime numbers containing the string 14.

149, 1409, 1423, 1427, 1429, 1433, 1439, 1447, 1451, 1453, 1459, 1471, 1481, 1483, 1487, 1489, 1493, 1499, 2141, 2143, 5147, 6143, 8147, 10141, 11149, 11411, 11423, 11437, 11443, 11447, 11467, 11471, 11483, 11489, 11491, 11497, 12143, 12149, 13147, 14009, 14011, 14029

Offset: 1

Author

Vincenzo Librandi, Jun 06 2014

Keywords

• nonn
• base

Links

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

Crossrefs

Cf. similar sequences listed in A243529.

Programs

Mathematica

Select[Prime[Range[2000]], !StringFreeQ[ToString[#], "14" ] &]
Select[Prime[Range[2000]],SequenceCount[IntegerDigits[#],{1,4}]>0&] (* Harvey P. Dale, Aug 19 2025 *)

PARI

contains(n,k)=my(N=digits(n),K=digits(k)); for(i=0,#N-#K, for(j=1,#K,if(N[i+j]!=K[j],next(2))); return(1)); 0
is(n)=isprime(n) && contains(n,14) \\ Charles R Greathouse IV, Jun 20 2014

Formula

a(n) ~ n log n. - Charles R Greathouse IV, Jun 20 2014