A126357 a(n) is the (n+1)st integer from among the positive integers which are coprime to n.
2, 5, 5, 9, 7, 19, 9, 17, 14, 27, 13, 37, 15, 33, 29, 33, 19, 55, 21, 51, 38, 49, 25, 73, 32, 57, 41, 67, 31, 113, 33, 65, 56, 73, 52, 109, 39, 81, 64, 101, 43, 149, 45, 97, 86, 97, 49, 145, 58, 127, 82, 113, 55, 163, 76, 131, 91, 121, 61, 227, 63, 129, 110, 129, 88, 221, 69
Offset: 1
Keywords
Examples
The positive integers which are coprime to 6 are 1,5,7,11,13,17,19,23,... The 7th of these is 19, which is a(6).
Programs
-
Mathematica
f[n_] := Block[{k = 0, c = n + 1},While[c > 0,k++;While[GCD[k, n] > 1, k++ ];c--;];k];Table[f[n], {n, 67}] (* Ray Chandler, Dec 29 2006 *)
Extensions
Extended by Ray Chandler, Dec 29 2006
Comments