OFFSET
1,2
COMMENTS
Equals A023119 in the first 98 terms, then the sequences differ. [From R. J. Mathar, Aug 08 2008]
REFERENCES
C. Kimberling, "Fractal Sequences and Interspersions", Ars Combinatoria, vol. 45 p 157 1997.
LINKS
T. D. Noe, Table of n, a(n) for n=1..1000
Eric Weisstein's World of Mathematics, Signature Sequence
MATHEMATICA
terms = 90; m = Ceiling[Sqrt[terms]]; s0 = {}; While[s = (Table[i + j*GoldenRatio^2, {i, 1, m}, {j, 1, m}] // Flatten // SortBy[#, N] &)[[1 ;; terms]] /. GoldenRatio -> 0; s != s0, s0 = s; m = 2 m]; s (* Jean-François Alcover, Jan 08 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Casey Mongoven, Apr 21 2006
STATUS
approved