A089326 a(n) = A089325(n+1)/A089325(n).

2, 3, 3, 3, 3, 2, 2, 3, 7, 5, 2, 2, 2, 2, 2, 4, 5, 3, 3, 12, 4, 22, 7, 3, 10, 2, 2, 6, 20, 12, 5, 10, 9, 6, 3, 7, 12, 2, 18, 3, 11, 13, 3, 11, 6, 3, 14, 38, 11, 8, 20, 23, 14, 16, 26, 37, 2, 24, 10, 31, 4, 20, 12, 25, 13, 49, 26, 6, 16, 26, 4, 8, 21, 38, 45, 60, 50, 55, 9, 2, 36, 25, 111, 20

Offset

1,1

Links

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

Mathematica

k = 3; Do[i = 2; While[ !PrimeQ[10*i*k + 1], i++ ]; k *= i; Print[i], {n, 1, 100}] (* Ryan Propper, Aug 06 2005 *)

Crossrefs

Cf. A089325.

Sequence in context: A162499 A350857 A135715 * A359514 A237367 A022923

Adjacent sequences: A089323 A089324 A089325 * A089327 A089328 A089329

Keyword

nonn

Author

Amarnath Murthy, Nov 03 2003

Extensions

More terms from Ryan Propper, Aug 06 2005

Status

approved