|
| |
|
|
A111704
|
|
a(n) = concatenation of (n times each digit of n).
|
|
2
|
|
|
|
1, 4, 9, 16, 25, 36, 49, 64, 81, 100, 1111, 1224, 1339, 1456, 1575, 1696, 17119, 18144, 19171, 400, 4221, 4444, 4669, 4896, 50125, 52156, 54189, 56224, 58261, 900, 9331, 9664, 9999, 102136, 105175, 108216, 111259, 114304, 117351, 1600, 16441, 16884
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Maxim Skorohodov, Table of n, a(n) for n = 1..10000
|
|
|
EXAMPLE
|
a(12) = concatenation 12*1, 12*2 = 1224.
a(123) = 123246369.
|
|
|
MATHEMATICA
|
Table[FromDigits@ Flatten@ Map[IntegerDigits, Map[n # &, IntegerDigits[n]]], {n, 42}] (* Michael De Vlieger, Nov 05 2020 *)
|
|
|
PROG
|
(PARI) a(n) = my(d=digits(n), s=""); for (i=1, #d, s = concat(s, n*d[i])); eval(s); \\ Michel Marcus, Nov 05 2020
|
|
|
CROSSREFS
|
Cf. A111705.
Sequence in context: A068864 A068854 A068867 * A052041 A018884 A050749
Adjacent sequences: A111701 A111702 A111703 * A111705 A111706 A111707
|
|
|
KEYWORD
|
base,easy,nonn
|
|
|
AUTHOR
|
Amarnath Murthy, Aug 22 2005
|
|
|
EXTENSIONS
|
More terms from Joshua Zucker, May 08 2006
|
|
|
STATUS
|
approved
|
| |
|
|
