A360229 Row sums of triangle A360173.

0, 1, 3, 6, 16, 36, 73, 156, 324, 677, 1405, 2864, 5906, 12058, 24548, 49928, 101434, 206173, 417141, 844256, 1707622, 3452998, 6970196, 14058528, 28368774, 57197983, 115239846, 232020596, 467296470, 940684267, 1892396396, 3805806218, 7654402454, 15391563411

Offset: 0

Author

John Tyler Rascoe, Jan 30 2023

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..800

Crossrefs

Cf. A141001, A141002, A360173.

Programs

Maple

b:= proc(n) option remember; `if`(n=0, 1, (p->
       add((t-> `if`(i
      add(i*coeff(p, x, i), i=0..degree(p)))(b(n))
    end:
seq(a(n), n=0..35);  # Alois P. Heinz, Jan 30 2023

Mathematica

b[n_] := b[n] = If[n == 0, 1, Function[p, Sum[Function[t, If[iJean-François Alcover, Apr 24 2025, after Alois P. Heinz *)