A126356 a(n) is the n-th integer from among the positive integers which are coprime to (n+1).

1, 2, 5, 4, 13, 6, 13, 11, 21, 10, 31, 12, 29, 26, 29, 16, 49, 18, 47, 34, 45, 22, 67, 29, 53, 38, 61, 28, 107, 30, 61, 52, 69, 48, 103, 36, 77, 61, 97, 40, 143, 42, 93, 82, 93, 46, 139, 55, 121, 79, 109, 52, 157, 73, 127, 88, 117, 58, 221, 60, 125, 107, 125, 86, 215, 66, 141

Offset

1,2

Links

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

Example

The positive integers which are coprime to 6 are 1,5,7,11,13,17,19,23,... The 5th of these is 13, which is a(5).

Mathematica

f[n_] := Block[{k = 0, c = n}, While[c > 0, k++; While[GCD[k, n + 1] > 1, k++ ]; c--; ]; k]; Table[f[n], {n, 67}] (* Ray Chandler, Dec 29 2006 *)

Crossrefs

Cf. A069213, A126357.

Sequence in context: A291650 A285292 A346595 * A121274 A256464 A111681

Adjacent sequences: A126353 A126354 A126355 * A126357 A126358 A126359

Keyword

nonn

Author

Leroy Quet, Dec 26 2006

Extensions

Extended by Ray Chandler, Dec 29 2006

Status

approved