A304647 Smallest term of A304636 that requires exactly n iterations to reach a fixed point under the x -> A181819(x) map.

5, 8, 30, 360, 1801800, 2746644314348614680000, 13268350773236509446586539974366689358164301703214270074935844483572035447570761114173070859428708074413696096366645684575600000000

Offset

0,1

Comments

The first entry 5 is optional so has offset 0.

Links

Table of n, a(n) for n=0..6.

Example

The list of multisets with Heinz numbers in the sequence is the following. The number of k's in row n + 1 is equal to the k-th largest term of row n.
                     5: {3}
                     8: {1,1,1}
                    30: {1,2,3}
                   360: {1,1,1,2,2,3}
               1801800: {1,1,1,2,2,3,3,4,5,6}
2746644314348614680000: {1,1,1,1,1,1,2,2,2,2,2,3,3,3,3,4,4,4,5,5,5,6,6,7,7,8,9,10}

Mathematica

Function[m, Times@@Prime/@m]/@NestList[Join@@Table[Table[i, {Reverse[#][[i]]}], {i, Length[#]}]&, {3}, 6]

Crossrefs

Cf. A001221, A001222, A001462, A012257, A014612, A033992, A071625, A112798, A181819, A182850, A182857, A275870, A304464, A304465, A304634, A304636.

Sequence in context: A228472 A361578 A049373 * A002536 A068981 A099631

Adjacent sequences: A304644 A304645 A304646 * A304648 A304649 A304650

Keyword

nonn

Author

Gus Wiseman, May 15 2018

Status

approved