A349547 a(n) is the length of the n-th row of A348575.

9, 28, 100, 3660, 2, 4, 34, 279, 1342, 24486, 41, 4, 9, 37, 3373, 30332, 10768, 89207, 9888780, 118322, 103912, 1083421, 1095431404, 1182371, 33970573, 116430219, 3152744167, 24330557, 27560841783

Offset

1,1

Comments

Terms computed by Claudio Meller.

Links

Table of n, a(n) for n=1..29.

Example

When A348575 is written as an irregular triangle, the first three rows are:
   1, ...,   37:   9 terms
  10, ...,  388:  28 terms
  19, ..., 4969: 100 terms
The lengths of the rows are [9, 28, 100] respectively, the same as the first three terms of this sequence.
a(30) exceeds 4242640687120 (perhaps by orders of magnitude); see A349548. - Jon E. Schoenfield, Nov 29 2021

Mathematica

seq[len_] := Module[{s = {1}, sq = {}, i = 1, d}, While[Length[sq] < len, If[MemberQ[s, (d = Plus @@ IntegerDigits[s[[-1]]])], AppendTo[s, s[[-1]] + i], AppendTo[s, d]; AppendTo[sq, i]; i = 0]; i++]; sq]; seq[15] (* Amiram Eldar, Nov 23 2021 *)

Crossrefs

Cf. A348575, A349548.

Sequence in context: A294567 A053819 A294287 * A085292 A198059 A181090

Adjacent sequences: A349544 A349545 A349546 * A349548 A349549 A349550

Keyword

nonn,base,hard,more

Author

Rodolfo Kurchan, Nov 21 2021

Extensions

a(23)-a(29) from Jon E. Schoenfield, Nov 30 2021

Status

approved