A111704 a(n) = concatenation of (n times each digit of n).

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

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: A068867 A068864 A068854 * 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