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!)
A253049 Numbers in A098550 which appear immediately after a prime. 4
3, 4, 6, 10, 13, 33, 18, 42, 48, 31, 58, 70, 43, 82, 90, 102, 110, 120, 126, 140, 144, 154, 150, 182, 180, 198, 200, 220, 216, 228, 272, 252, 280, 270, 300, 306, 312, 330, 336, 340, 348, 360, 390, 392, 396, 400, 442, 438, 468, 440, 506, 480, 484, 500, 486, 518, 528, 540, 574, 546, 570, 572, 616 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

It is conjectured that this is the same as A253048 except for the addition of 3, 13, 31, and 43 (the upper members of the twin primes in A098550).

a(n) = A098550(A251239(n)+1). - Reinhard Zumkeller, Dec 29 2014

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

David L. Applegate, Hans Havermann, Bob Selcoe, Vladimir Shevelev, N. J. A. Sloane, and Reinhard Zumkeller, The Yellowstone Permutation, arXiv preprint arXiv:1501.01669, 2015 and J. Int. Seq. 18 (2015) 15.6.7.

MATHEMATICA

f[lst_] := Block[{k = 4}, While[GCD[lst[[-2]], k] == 1 || GCD[lst[[-1]], k] > 1 || MemberQ[lst, k], k++]; Append[lst, k]];

A098550 = Nest[f, {1, 2, 3}, 1000];

sp = SequencePosition[A098550, {_?PrimeQ, _}] [[All, 2]];

A098550[[sp]] (* Jean-François Alcover, Sep 03 2018, after Robert G. Wilson v in A098550 *)

CROSSREFS

Cf. A098550. See A253048 for another version.

Cf. A251239.

Sequence in context: A310002 A240577 A074321 * A167410 A302340 A310003

Adjacent sequences:  A253046 A253047 A253048 * A253050 A253051 A253052

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Dec 27 2014

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 June 15 00:00 EDT 2021. Contains 345041 sequences. (Running on oeis4.)