This site is supported by donations to The OEIS Foundation.

 Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A167968 Signature sequence of phi^4 = 0.14589803375032..., where phi is the golden ratio minus 1 (0.61803398874989...). 3
 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1, 5, 4, 3, 2, 1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,8 REFERENCES Clark Kimberling, "Fractal Sequences and Interspersions," Ars Combinatoria 45 (1997) 157-168. LINKS MATHEMATICA terms = 105; m = Ceiling[Sqrt[terms]]; s0 = {}; While[s = (Table[i + j*(GoldenRatio-1)^4, {i, 1, m}, {j, 1, m}] // Flatten // SortBy[#, N]&)[[1 ;; terms]] /. GoldenRatio -> 1; s != s0, s0 = s; m = 2m]; s (* Jean-François Alcover, Jan 08 2017 *) CROSSREFS Cf. A084531, A084532, A167972. Sequence in context: A287867 A023126 A160985 * A161239 A161063 A161267 Adjacent sequences:  A167965 A167966 A167967 * A167969 A167970 A167971 KEYWORD nonn AUTHOR Casey Mongoven, Nov 15 2009 STATUS approved

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

Last modified December 16 19:57 EST 2018. Contains 318188 sequences. (Running on oeis4.)