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!)
A285691 a(1) = 2; a(n + 1) = smallest prime > a(n) such that a(n + 1) - a(n) is the product of six primes. 4
2, 1217, 1361, 1601, 1697, 1913, 2129, 2273, 2417, 2633, 2729, 2953, 3049, 3209, 3433, 3529, 3593, 3833, 3929, 4073, 4217, 4441, 4657, 4721, 4817, 5153, 5297, 5393, 5717, 5813, 6029, 6173, 6269, 6829, 7069, 7213, 7309, 7549, 7789 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

First differences: 1215, 144, 240, 96, 216, 216, 144, 144, 216, 96, 224, 96, 160, 224, 96, 64, 240, 96, 144, 144, ...

LINKS

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

MAPLE

A[1]:= 2: p:= 2: n:= 1:

while n < 60 do

    p:= nextprime(p);

    if numtheory:-bigomega(p-A[n]) = 6 then n:= n+1; A[n]:= p;

    fi

od:

seq(A[i], i=1..60); # Robert Israel, Nov 28 2019

MATHEMATICA

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

CROSSREFS

Cf. A255609, A285688, A285689, A285690.

Sequence in context: A277274 A036104 A036106 * A281250 A171940 A160003

Adjacent sequences:  A285688 A285689 A285690 * A285692 A285693 A285694

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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 22 15:40 EDT 2021. Contains 348172 sequences. (Running on oeis4.)