|
%I #8 Mar 25 2017 05:35:27
%S 1,2,7,2,29,56,77,94,222,993,202,1866,7007,1653,24379,61377,6307,
%T 149862,324691,350053,1502192,3263293,1764799,1897951,20839416,
%U 4293902,19056271,35965591,105749822,558273850,1253419992,3010125259,6163513735
%N Decimal equivalents of numbers in A100751.
%H John Cerkan, <a href="/A100489/b100489.txt">Table of n, a(n) for n = 1..3300</a>
%t d = Flatten[Table[IntegerDigits[n, 2], {n, 100}]]; Table[FromDigits[Take[d, {n(n + 1)/2 + 1, (n + 1)(n + 2)/2}], 2], {n, 0, 32}]
%Y Cf. A100751, A066547.
%K base,nonn
%O 1,2
%A _Amarnath Murthy_ and _Robert G. Wilson v_, Nov 22 2004
|
