A100489
Decimal equivalents of numbers in A100751.
Original entry on oeis.org
1, 2, 7, 2, 29, 56, 77, 94, 222, 993, 202, 1866, 7007, 1653, 24379, 61377, 6307, 149862, 324691, 350053, 1502192, 3263293, 1764799, 1897951, 20839416, 4293902, 19056271, 35965591, 105749822, 558273850, 1253419992, 3010125259, 6163513735
Offset: 1
-
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}]
A066547
Let N = 123456789101112131415161718..., the concatenation of the natural numbers. a(n) is the n-digit number formed from the digits of N starting from the {n(n-1)/2 +1}th digit. Omit any leading zeros.
Original entry on oeis.org
1, 23, 456, 7891, 1112, 131415, 1617181, 92021222, 324252627, 2829303132, 33343536373, 839404142434, 4454647484950, 51525354555657, 585960616263646, 5666768697071727, 37475767778798081, 828384858687888990, 9192939495969798991, 101102103104105106, 107108109110111112113
Offset: 1
1, 23, 456, 7891, 01112, 131415, 1617181, 92021222, 3... becomes 1, 23, 456, 7891, 1112, 131415, 1617181, 92021222, ...
-
d = Flatten[IntegerDigits /@ Range[90]]; Table[FromDigits[Take[d, {n(n + 1)/2 + 1, (n + 1)(n + 2)/2}]], {n, 0, 17}] (* Robert G. Wilson v, Nov 22 2004 *)
-
N=[]; k=0; for(n=1,20, while(#NM. F. Hasler, May 08 2014
More terms from Larry Reeves (larryr(AT)acm.org), Dec 18 2001
Showing 1-2 of 2 results.