A064652 Primes q associated with A064632.

2, 3, 2, 3, 2, 5, 3, 3, 2, 3, 2, 5, 3, 3, 2, 7, 2, 11, 3, 3, 2, 3, 5, 5, 3, 5, 2, 3, 2, 11, 7, 3, 5, 3, 2, 5, 7, 3, 2, 3, 2, 5, 3, 5, 2, 7, 3, 5, 3, 3, 2, 3, 3, 7, 3, 5, 2, 13, 2, 7, 7, 3, 5, 3, 2, 5, 3, 3, 2, 13, 2, 5, 3, 3, 7, 7, 2, 5, 43, 3, 2, 3, 5, 13, 3, 5, 2, 3, 3, 7, 19, 5, 11, 3, 2, 5, 3, 3, 2

Offset

2,1

Links

Daria Micovic, Table of n, a(n) for n = 2..10000 (Terms 2-100 from Robert G. Wilson v; terms 101-1155 from Stephanie Anderson).

Matthew M. Conroy, A sequence related to a conjecture of Schinzel, J. Integ. Seqs. Vol. 4 (2001), #01.1.7.

Example

a(7) = 5 because (29-1)/(5-1).

Mathematica

NextPrim[n_] := (k = n + 1; While[ !PrimeQ[k], k++ ]; k); Do[p = 2; While[q = (p - 1)/n + 1; !PrimeQ[q] || q >= p, p = NextPrim[p]]; Print[q], {n, 2, 100} ]

Crossrefs

Cf. A064632, A064673.

Sequence in context: A084740 A229708 A204895 * A077600 A120223 A282691

Adjacent sequences: A064649 A064650 A064651 * A064653 A064654 A064655

Keyword

easy,nonn

Author

Robert G. Wilson v, Oct 16 2001

Status

approved