The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A220142

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A220142

The values of k in A220141.
(history; published version)

#9 by Susanna Cuyler at Mon Dec 30 10:05:45 EST 2019

STATUS

proposed

approved

#8 by Amiram Eldar at Mon Dec 30 05:51:28 EST 2019

STATUS

editing

proposed

#7 by Amiram Eldar at Mon Dec 30 05:41:36 EST 2019

KEYWORD

nonn,more,changed

EXTENSIONS

More terms from Amiram Eldar, Dec 30 2019

#6 by Amiram Eldar at Mon Dec 30 05:40:51 EST 2019

DATA

2, 6, 18, 24, 42, 54, 120, 258, 396, 480, 612, 840, 1074, 1800, 2130, 2172, 2256, 2550, 2694, 3282, 3492, 3690, 3810, 4110, 4626, 4788, 4860, 4992, 5148, 5280, 5958, 5994, 6804, 7920, 9654, 9660, 11082, 16134

STATUS

approved

editing

#5 by T. D. Noe at Tue Jan 08 10:59:07 EST 2013

STATUS

editing

approved

#4 by T. D. Noe at Tue Jan 08 10:59:02 EST 2013

DATA

2, 6, 18, 24, 42, 54, 120, 258, 396, 480, 612, 840, 1074, 1800, 2130, 2172, 2256, 2550, 2694, 3282, 3492, 3690, 3810, 4110, 4626, 4788, 4860, 4992

STATUS

approved

editing

#3 by T. D. Noe at Tue Jan 08 00:44:47 EST 2013

STATUS

editing

approved

#2 by T. D. Noe at Tue Jan 08 00:41:49 EST 2013

NAME

allocated for T. D. Noe

The values of k in A220141.

DATA

2, 6, 18, 24, 42, 54, 120, 258, 396, 480, 612, 840, 1074, 1800, 2130, 2172, 2256, 2550, 2694, 3282, 3492

OFFSET

1,1

MATHEMATICA

t = {{2, 2}}; Do[k = 1; While[! (PrimeQ[k*n - 1] && PrimeQ[k*n + 1]), k++]; If[k > t[[-1, 2]], AppendTo[t, {n, k}]], {n, Prime[Range[2, 1000]]}]; Transpose[t][[2]]

CROSSREFS

Cf. A071407, A220141.

KEYWORD

allocated

nonn

AUTHOR

T. D. Noe, Jan 08 2013

STATUS

approved

editing

#1 by T. D. Noe at Thu Dec 06 01:07:15 EST 2012

NAME

allocated for T. D. Noe

KEYWORD

allocated

STATUS

approved