A285694 a(1) = 2; a(n + 1) = smallest prime > a(n) such that a(n + 1) - a(n) is the product of 10 primes.

2, 59051, 62507, 64811, 66347, 67883, 71339, 73643, 81707, 83243, 87083, 89387, 91691, 95531, 99371, 100907, 104491, 110251, 115883, 119723, 121259, 126443, 127979, 136043, 139627, 141931, 143467, 145771, 148331

Offset

1,1

Comments

First differences: 59049, 3456, 2304, 1536, 1536, 3456, 2304, 8064, 1536, 3840, 2304, 2304, ...

Links

Table of n, a(n) for n=1..29.

Mathematica

NestList[Module[{p = NextPrime@ #}, While[PrimeOmega[p - #] != 10, p = NextPrime@ p]; p] &, 2, 28] (* Michael De Vlieger, Apr 25 2017 *)

Crossrefs

Cf. A255609, A285688, A285689, A285690, A285691, A285692, A285693.

Sequence in context: A321382 A153924 A059764 * A306907 A052427 A051833

Adjacent sequences: A285691 A285692 A285693 * A285695 A285696 A285697

Keyword

nonn

Author

Zak Seidov, Apr 25 2017

Status

approved