login
A087075
Multiples of 7 with digits grouped in pairs and leading zeros omitted.
8
71, 42, 12, 83, 54, 24, 95, 66, 37, 7, 78, 49, 19, 81, 5, 11, 21, 19, 12, 61, 33, 14, 1, 47, 15, 41, 61, 16, 81, 75, 18, 21, 89, 19, 62, 3, 21, 2, 17, 22, 42, 31, 23, 82, 45, 25, 22, 59, 26, 62, 73, 28, 2, 87, 29, 43, 1, 30, 83, 15, 32, 23, 29, 33, 63, 43, 35, 3, 57, 36, 43, 71
OFFSET
1,1
MATHEMATICA
FromDigits /@ Partition[ Flatten[ IntegerDigits[ Table[ 7n, {n, 1, 60}]]], 2] (* Robert G. Wilson v *)
(IntegerDigits/@(7 Range[16]))//peek//Flatten//Partition[ #, 2]&// Map[FromDigits, # ]& (* Ken Levasseur *)
KEYWORD
nonn,base,easy
AUTHOR
N. J. A. Sloane, Oct 19 2003
EXTENSIONS
More terms from Ray Chandler, Oct 20 2003
STATUS
approved