A167974 - OEIS

%I #10 May 27 2024 11:34:20

%S 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,1,19,2,20,3,21,4,22,5,

%T 23,6,24,7,25,8,26,9,27,10,28,11,29,12,30,13,31,14,32,15,33,16,34,17,

%U 35,18,36,1,19,37,2,20,38,3,21,39,4,22,40,5,23,41,6,24,42,7,25,43,8,26,44,9

%N Signature sequence of Phi^6 = 17.944271909999..., where Phi is the golden ratio 1.6180339887499... .

%D Clark Kimberling, "Fractal Sequences and Interspersions," Ars Combinatoria 45 (1997) 157-168.

%H <a href="/index/Si#signature_sequences">Index entries for sequences related to signature sequences</a>

%t terms = 79; m = Ceiling[Sqrt[terms]]; s0 = {}; While[s = (Table[i + j*GoldenRatio^6, {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 Cf. A084531, A084532.

%K nonn

%O 1,2

%A _Casey Mongoven_, Nov 15 2009