|
%I #10 Apr 22 2022 12:17:42
%S 24,68,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40,42,44,46,48,50,
%T 52,54,56,58,60,62,64,66,68,70,72,74,76,78,80,82,84,86,88,90,92,94,96,
%U 98,10,1,2,10,41,6,10,81,10,11,21,14,11,61,18,12,1,22,12,41,26,12,81,30
%N Multiples of 2 with digits grouped in pairs and leading zeros omitted.
%t FromDigits /@ Partition[ Flatten[ IntegerDigits[ Table[ 2n, {n, 1, 65}]]], 2] (* _Robert G. Wilson v_ *)
%t FromDigits/@Partition[Flatten[IntegerDigits/@(2*Range[80])],2] (* _Harvey P. Dale_, Apr 22 2022 *)
%Y Cf. A005843, A059805, A060936, A087407, A087408, A087409, A087075, A087410, A087411.
%K nonn,easy,base
%O 1,1
%A _N. J. A. Sloane_, Oct 19 2003
%E More terms from _Ray Chandler_, Oct 20 2003
|
