A087407 Multiples of 4 with digits grouped in pairs and leading zeros omitted.
48, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60, 64, 68, 72, 76, 80, 84, 88, 92, 96, 10, 1, 4, 10, 81, 12, 11, 61, 20, 12, 41, 28, 13, 21, 36, 14, 1, 44, 14, 81, 52, 15, 61, 60, 16, 41, 68, 17, 21, 76, 18, 1, 84, 18, 81, 92, 19, 62, 0, 20, 42, 8, 21, 22, 16, 22, 2, 24, 22
Offset: 1
Programs
-
Mathematica
FromDigits /@ Partition[ Flatten[ IntegerDigits[ Table[ 4n, {n, 1, 60}]]], 2] (* Robert G. Wilson v *)
Extensions
More terms from Ray Chandler, Oct 20 2003