This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A118276 #21 Feb 16 2025 08:33:01
%S A118276 1,2,3,1,4,2,5,3,6,1,4,7,2,5,8,3,6,1,9,4,7,2,10,5,8,3,11,6,1,9,4,12,7,
%T A118276 2,10,5,13,8,3,11,6,14,1,9,4,12,7,15,2,10,5,13,8,16,3,11,6,14,1,9,17,
%U A118276 4,12,7,15,2,10,18,5,13,8,16,3,11,19,6,14,1,9,17,4,12,20,7,15,2,10,18,5,13
%N A118276 Signature sequence of Phi^2 = 2.618033989... (A104457), where Phi is the golden ratio A001622.
%C A118276 Equals A023119 in the first 98 terms, then the sequences differ. [From _R. J. Mathar_, Aug 08 2008]
%D A118276 C. Kimberling, "Fractal Sequences and Interspersions", Ars Combinatoria, vol. 45 p 157 1997.
%H A118276 T. D. Noe, <a href="/A118276/b118276.txt">Table of n, a(n) for n=1..1000</a>
%H A118276 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SignatureSequence.html">Signature Sequence</a>
%H A118276 <a href="/index/Si#signature_sequences">Index entries for sequences related to signature sequences</a>
%t A118276 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 *)
%Y A118276 Cf. A084531, A084532, A167970.
%K A118276 nonn
%O A118276 1,2
%A A118276 _Casey Mongoven_, Apr 21 2006