|
%I #8 Jun 06 2017 10:37:52
%S 5,5,11,11,11,24,24,24,24,24,24,24,54,54,54,54,54,54,54,54,54,54,54,
%T 54,54,54,54,54,124,124,124,124,124,124,124,124,124,124,124,124,124,
%U 124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124,124
%N Position of second occurrence of first n terms in A287108.
%C Lengths of runs of the same values: 2, 3, 7, 16, 37, 86, 200, 465.
%t Function[s, Table[SequencePosition[s, Take[s, n]][[2, 1]], {n, 60}]]@
%t Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {2, 1}, 2 -> 0}] &, {0}, 10] (* _Michael De Vlieger_, Jun 06 2017, after _Clark Kimberling_ at A287108 *)
%Y Cf. A287108.
%K nonn
%O 1,1
%A _Zak Seidov_, Jun 04 2017
|
