A068832 Primes with all odd digits such that the next four primes also contain all odd digits.

3, 5, 7, 311, 15937, 17939, 19973, 39113, 51131, 53717, 53719, 55313, 59753, 91711, 93113, 99119, 111953, 117911, 117917, 117937, 153113, 157931, 159911, 191519, 195971, 311533, 355913, 391711, 391717, 391733, 575131, 575513, 577919, 577931, 579113

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

311 belongs to this sequence as the next four primes 313, 317, 331 and 337 contain all odd digits.

Mathematica

Prime/@Flatten[Position[Partition[Table[If[AllTrue[IntegerDigits[ n], OddQ], 1, 0], {n, Prime[Range[50000]]}], 5, 1], {1, 1, 1, 1, 1}]] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 20 2015 *)

Prog

(Magma) [NthPrime(n): n in [1..10^5] | forall{NthPrime(n+i): i in [0..4] | Intseq(NthPrime(n+i)) subset [1..9 by 2]}]; // Bruno Berselli, Aug 08 2013

Crossrefs

Cf. A068830, A068831.

Sequence in context: A211678 A082756 A268693 * A046472 A065824 A191546

Adjacent sequences: A068829 A068830 A068831 * A068833 A068834 A068835

Keyword

nonn,base

Author

Amarnath Murthy, Mar 09 2002

Extensions

More terms from Bruno Berselli, Aug 08 2013

Status

approved