|
%I #5 Nov 15 2018 09:03:55
%S 1,1,1,1,2,1,6,4,1,1,1,1,1,3,1,1,2,3,1,1,1,3,1,1,1,1,3,1,2,1,1,2,1,1,
%T 1,1,1,2,2,1,1,1,1,1,1,1,6,1,3,3,1,1,1,1,2,3,1,7,1,2,3,2,4,1,1,2,4,2,
%U 4,3,3,1,2,3,1,1,3,2,3,3,1,1,2,5,4,2,3,3,1,1,2,1,1,2,2,1,2,1,1,2,1,1,1,1,2
%N Run lengths in binary expansion of e.
%e The binary expansion of e is: 1 0. 1 0 11 0 111111 0000 1 ...
%t Length/@Split[RealDigits[E,2,200][[1]]] (* _Harvey P. Dale_, Nov 15 2018 *)
%Y A004593.
%K base,nonn
%O 1,5
%A H. Tracy Hall (hthall(AT)math.berkeley.edu)
|
