login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A166582 Primes containing the string 444. 13
4441, 4447, 14447, 14449, 24443, 44417, 44449, 44453, 44483, 44491, 44497, 54443, 54449, 74441, 74449, 84443, 84449, 94441, 94447, 124447, 134443, 144407, 144409, 144413, 144427, 144439, 144451, 144461, 144479, 144481, 144497, 164443, 164447 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

MATHEMATICA

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

Select[Prime[Range[16000]], SequenceCount[IntegerDigits[#], {4, 4, 4}]>0&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 15 2018 *)

CROSSREFS

Cf. A166571 - A166573, A166579 - A166581.

Sequence in context: A309487 A206016 A091739 * A043508 A114908 A102622

Adjacent sequences:  A166579 A166580 A166581 * A166583 A166584 A166585

KEYWORD

nonn,base

AUTHOR

Vincenzo Librandi, Nov 01 2009

EXTENSIONS

Corrected (144491 replaced by 144497) by R. J. Mathar, Nov 30 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 23 03:40 EDT 2020. Contains 337291 sequences. (Running on oeis4.)