A098129 Concatenate 1 once, 2 twice, 3 three times, up to n n times.

1, 122, 122333, 1223334444, 122333444455555, 122333444455555666666, 1223334444555556666667777777, 122333444455555666666777777788888888, 122333444455555666666777777788888888999999999

Offset

1,2

Comments

a(n) is composite for all 2 <= n <= 1000. - David Cleaver, Mar 22 2023

Links

Seiichi Manyama, Table of n, a(n) for n = 1..31

Example

a(4) = 1223334444 because 1 concatenated once then concatenated with 2 twice and 3 three times and 4 four times gives 1223334444.

Maple

a:= n-> parse(cat(seq(i$i, i=1..n))):
seq(a(n), n=1..12);  # Alois P. Heinz, Mar 07 2018

Mathematica

nn = 12; a[0] = {}; Do[Set[a[n], Join[a[n - 1], Flatten@ ConstantArray[IntegerDigits[n], n]]], {n, nn}]; Array[FromDigits @* a, nn] (* Michael De Vlieger, Mar 29 2023 *)

Prog

(PARI)
a(n) = {my(a=0, i, k);
  for(i=1, n, k = logint(i, 10)+1;
    a = a*10^(i*k) + i*(10^(i*k)-1)/(10^k-1);
); return(a); } \\ David Cleaver, Mar 29 2023
(Python)
def A098129(n): return int(''.join(str(j)*j for j in range(1, n+1))) # Chai Wah Wu, Mar 29 2023

Crossrefs

Cf. A000461, A300517, A361751 (number of decimal digits).

Sequence in context: A208390 A282274 A208397 * A198603 A237640 A258489

Adjacent sequences: A098126 A098127 A098128 * A098130 A098131 A098132

Keyword

easy,nonn,base

Author

Michael Joseph Halm, Jan 04 2005

Extensions

Offset and a(8) corrected by Seiichi Manyama, Mar 07 2018

Status

approved