A121799 Values of k from A061092.

1, 1, 2, 4, 2, 12, 4, 8, 26, 2, 8, 18, 16, 2, 6, 12, 4, 32, 30, 6, 40, 60, 22, 12, 208, 18, 48, 168, 18, 76, 6, 232, 48, 4, 50, 78, 28, 236, 68, 1026, 10, 162, 6, 138, 162, 48, 120, 330, 82, 414, 130, 188, 164, 6, 6, 100, 126, 10, 36, 40, 48, 94, 14, 218, 954

Offset

1,3

Comments

A061092 is: a(0) = 1; for n>0 a(n) is the smallest prime, larger than a(n-1), of the form k*a(n-1) + 1. - Corrected by Zak Seidov, Oct 03 2015

Links

Ken Takusagawa, Table of n, a(n) for n = 1..3000 (terms 1..200 from T. D. Noe)

Formula

a(n) = (A061092(n)-1)/A061092(n-1). - Zak Seidov, Oct 03 2015

Mathematica

a = {2}; b = {1}; Do[k = 1; p = a[[n - 1]]; While[! PrimeQ[k p + 1], k++]; AppendTo[a, k p + 1]; AppendTo[b, k], {n, 2, 60}]; b (* Michael De Vlieger, Oct 03 2015, after Robert G. Wilson v at A061092 *)

Crossrefs

Cf. A061092, A072532, A113334.

Sequence in context: A332401 A125755 A118921 * A078034 A181091 A161795

Adjacent sequences: A121796 A121797 A121798 * A121800 A121801 A121802

Keyword

nonn

Author

Zak Seidov, Oct 26 2005, Dec 14 2006

Extensions

Definition corrected by Ken Takusagawa, Jan 17 2006

Corrected and extended by T. D. Noe, Mar 10 2007

Edited by N. J. A. Sloane, Aug 08 2008 at the suggestion of R. J. Mathar

Status

approved