login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A285692 a(1) = 2; a(n + 1) = smallest prime > a(n) such that a(n + 1) - a(n) is the product of 7 primes. 3
2, 9479, 9767, 10247, 10567, 11047, 11239, 11527, 11719, 12007, 12487, 12919, 13367, 13687, 13879, 14071, 14503, 14951, 15271, 15559, 15991, 16183, 16631, 16759, 17047, 17239, 17431, 17623, 17911, 18199, 18679, 19687, 20359, 20551, 20743, 21031, 21319, 21751, 21943 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

First differences: 9477, 288, 480, 320, 480, 192, 288, 192, 288, 480, 432, 448, 320, 192, 192, 432, 448, 320, 288, 432,...

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

A:= Vector(100): A[1]:= 2:

for n from 2 to 100 do

p:= A[n-1];

do

p:= nextprime(p);

until numtheory:-bigomega(p-A[n-1]) = 7;

A[n]:= p;

od:

convert(A, list); # Robert Israel, Dec 28 2022

MATHEMATICA

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

CROSSREFS

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

Sequence in context: A272247 A167748 A203755 * A340546 A343700 A086563

Adjacent sequences: A285689 A285690 A285691 * A285693 A285694 A285695

KEYWORD

nonn

AUTHOR

Zak Seidov, Apr 25 2017

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 27 20:39 EDT 2023. Contains 361575 sequences. (Running on oeis4.)