A218345 Records in A218344.

1, 2, 3, 4, 5, 6, 12, 20, 30, 42, 46, 48, 84, 108, 114, 126, 130, 144, 166, 182, 192, 212, 246, 258, 270, 288, 294, 310, 406, 480, 494, 504, 534, 586

Offset

1,2

Links

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

Formula

a(n) = A218344(A354740(n)). - Amiram Eldar, Jun 05 2022

Mathematica

t = {1}; For[k = 6, k < 100000, k++, If[! PrimeQ[k], Mult = 1; While[! PrimeQ[k*Mult + 1], Mult = Mult + 1]; If[Mult > t[[-1]], AppendTo[t, Mult]]]]; t

Crossrefs

Cf. A218344, A354740.

Sequence in context: A177958 A032941 A273733 * A059460 A125141 A350211

Adjacent sequences: A218342 A218343 A218344 * A218346 A218347 A218348

Keyword

nonn,more

Author

William J. Keith, Oct 26 2012

Extensions

a(21)-a(34) from Amiram Eldar, Jun 05 2022

Status

approved