|
Search: id:A123302
|
|
|
| A123302 |
|
a(0) = 1. a(n) = the n-th integer from among those positive integers coprime to a(n-1). |
|
+0
2
|
|
| 1, 1, 2, 5, 4, 9, 8, 13, 8, 17, 10, 27, 17, 13, 15, 28, 37, 17, 19, 20, 49, 24, 65, 31, 24, 73, 26, 57, 44, 63, 52, 67, 32, 65, 46, 73, 36, 109, 38, 81, 59, 41, 43, 44, 95, 59, 46, 97, 48, 145, 64, 101, 52, 113, 54, 163, 56, 131, 58, 121, 65, 82, 127, 63, 110, 177, 100, 167, 68
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
EXAMPLE
|
The positive integers coprime to a(6)=8 are 1,3,5,7,9,11,13,15,17,19... The seventh of these is 13, so a(7) = 13.
|
|
MATHEMATICA
|
f[l_List] := Block[{k = 0, c = Length[l]}, While[c > 0, k++; While[ GCD[k, l[[ -1]]] > 1, k++ ]; c--; ]; Append[l, k]]; Nest[f, {1}, 70] (*Chandler*)
|
|
CROSSREFS
|
Sequence in context: A080031 A065221 A114752 this_sequence A120119 A048678 A084432
Adjacent sequences: A123299 A123300 A123301 this_sequence A123303 A123304 A123305
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Nov 08 2006
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 11 2006
|
|
|
Search completed in 0.002 seconds
|
