%I #18 May 28 2024 06:35:26
%S 1,1,1,2,1,2,1,2,3,1,2,3,1,2,3,4,1,2,3,4,1,2,3,4,5,1,2,3,4,5,1,2,3,4,
%T 5,1,6,2,3,4,5,1,6,2,3,4,5,1,6,2,7,3,4,5,1,6,2,7,3,4,5,1,6,2,7,3,8,4,
%U 5,1,6,2,7,3,8,4,5,1,6,2,7,3,8,4,9,5,1,6,2,7,3,8,4,9,5,1,6,2,7,3,8,4,9,5,1
%N Signature sequence of 1/sqrt(5) (arrange the numbers i+j*x (i,j >= 1) in increasing order; the sequence of i's is the signature of x).
%D C. Kimberling, "Fractal Sequences and Interspersions", Ars Combinatoria, vol. 45 p 157 1997.
%H T. D. Noe, <a href="/A023118/b023118.txt">Table of n, a(n) for n=1..1000</a>
%H C. Kimberling, <a href="http://faculty.evansville.edu/ck6/integer/intersp.html">Interspersions</a>
%H <a href="/index/Si#signature_sequences">Index entries for sequences related to signature sequences</a>
%t signseq[n_] := Take[ Transpose[ Sort[ Flatten[ Table[{i + j*n, i}, {i, Max[15, 15n]}, {j, Max[15, 15/n]}], 1], #1[[1]] < #2[[1]] &]][[2]], 105]; signseq[1/Sqrt[5]] (* _Robert G. Wilson v_, Sep 20 2004 *)
%Y Cf. A020762.
%K nonn
%O 1,4
%A _Clark Kimberling_
%E More terms from _Robert G. Wilson v_, Sep 20 2004