|
|
A059632
|
|
Carryless product 11 X n base 10.
|
|
3
|
|
|
0, 11, 22, 33, 44, 55, 66, 77, 88, 99, 110, 121, 132, 143, 154, 165, 176, 187, 198, 109, 220, 231, 242, 253, 264, 275, 286, 297, 208, 219, 330, 341, 352, 363, 374, 385, 396, 307, 318, 329, 440, 451, 462, 473, 484, 495, 406, 417, 428, 439, 550, 561, 572, 583
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(19)=109 since we have 11 X 19 = carryless sum of 100, 90, 10 and 9 =109
|
|
PROG
|
(Haskell)
a059632 n = foldl (\v d -> 10 * v + d) 0 $
map (flip mod 10) $ zipWith (+) ([0] ++ ds) (ds ++ [0])
where ds = map (read . return) $ show n
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|