A071057 Smallest number m such that m = prime(i+1) mod prime(i) for 1<=i<=n.

1, 5, 17, 137, 1817, 20297, 350627, 8518787, 86116307, 5886530927, 193507634597, 6210322338497, 124942132495457, 3471695031294767, 42719979026304857, 3117168891968761907, 850435289298909924887, 91220171746546903961177, 2906141324372314207559657, 144355929243817121213383277

Offset

1,2

Links

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

Mathematica

Table[ ChineseRemainder[ Table[ Prime[i + 1], {i, 1, n}], Table[ Prime[i], {i, 1, n}]], {n, 1, 20}]
(* Alternative: *)
Table[With[{pr=Prime[Range[n+1]]}, ChineseRemainder[Rest[pr], Most[pr]]], {n, 1, 20}] (* Harvey P. Dale, Jun 11 2017 *)

Crossrefs

Cf. A053664.

Sequence in context: A249520 A248661 A176133 * A181922 A177509 A160611

Adjacent sequences: A071054 A071055 A071056 * A071058 A071059 A071060

Keyword

nonn

Author

Robert G. Wilson v, May 25 2002

Extensions

a(19)-a(20) from Stefano Spezia, May 12 2026

Status

approved