The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A050171 a(n)=least k satisfying a(k)=n in A050170. 1
 1, 2, 5, 3, 8, 6, 21, 4, 13, 11, 9, 30, 7, 24, 22, 71, 20, 18, 16, 14, 45, 12, 39, 10, 33, 31, 106, 104, 29, 27, 25, 82, 23, 74, 72, 251, 249, 70, 68, 19, 62, 17, 54, 15, 48, 46, 163, 161, 44, 42, 40, 139, 38, 36, 34, 117, 115, 32, 109, 107, 366, 105 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Ivan Neretin, Table of n, a(n) for n = 1..2000 MATHEMATICA terms = 62; (* b = A050170 *) b[1] = 1; b[n_] := b[n] = If[FreeQ[Join[{0}, Array[b, n-1]], f = Floor[b[n-1]/Sqrt[5]]], f, Floor[b[n-1]*Sqrt[5]]]; Table[FirstPosition[Array[b, 6*terms], n], {n, 1, terms}] // Flatten (* Jean-François Alcover, Sep 12 2017 *) CROSSREFS Sequence in context: A197393 A257271 A257280 * A258406 A136189 A309557 Adjacent sequences: A050168 A050169 A050170 * A050172 A050173 A050174 KEYWORD nonn AUTHOR Clark Kimberling EXTENSIONS Missing terms inserted by Jean-François Alcover, Sep 12 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 5 02:46 EDT 2023. Contains 363130 sequences. (Running on oeis4.)