|
%I #15 Jan 20 2019 23:18:33
%S 12,34,56,78,91,1,11,21,31,41,51,61,71,81,92,2,12,22,32,42,52,62,72,
%T 82,93,3,13,23,33,43,53,63,73,83,94,4,14,24,34,44,54,64,74,84,95,5,15,
%U 25,35,45,55,65,75,85,96,6,16,26,36,46,56,66,76,86,97,7,17,27,37,47,57,67
%N Natural numbers written with digits grouped in pairs and leading zeros omitted.
%H Rémy Sigrist, <a href="/A059805/b059805.txt">Table of n, a(n) for n = 1..10000</a>
%F a(2n-1)*100 + a(2n) = A091332(n); a(2n-1) = floor(A091332(n)/100), a(2n) = (A091332(n) mod 100). - _M. F. Hasler_, Oct 23 2014
%t FromDigits /@ Partition[ Flatten[ IntegerDigits[ Table[ n, {n, 1, 77}]]], 2] (* _Robert G. Wilson v_ *)
%o (PARI) {c=0; d=[]; for(n=1, 99, while(#d<2, d=concat(d, digits(c++))); print1(d[1],d[2]", "); d=vecextract(d, "^..2"))} \\ _M. F. Hasler_, Oct 23 2014
%Y Cf. A000027, A087406, A060936, A087407, A087408, A087409, A087075, A087410, A087411.
%Y Cf. A091331, A091332.
%K easy,base,nonn
%O 1,1
%A Kazimierz Kurz (kurzk(AT)prokom.pl), Mar 01 2001
%E More terms from _Jason Earls_, Mar 24 2001
|
