%I #14 May 27 2024 11:42:52
%S 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,
%T 27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,1,48,
%U 2,49,3,50,4,51,5,52,6,53,7,54,8,55,9,56,10,57,11,58,12,59,13,60,14,61,15
%N Signature sequence of Phi^8 = 46.978713763748..., 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 = 76; m = Ceiling[Sqrt[terms]]; s0 = {}; While[s = (Table[i + j*GoldenRatio^8, {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, A167964.
%K nonn
%O 1,2
%A _Casey Mongoven_, Nov 15 2009