A374861 Obverse convolution (n)**A000201; see Comments.

0, 1, 12, 144, 2400, 50400, 1143072, 31046400, 903260160, 30356726400, 1154305152000, 46189964620800, 2053748448460800, 100323076215398400, 5103635783178240000, 282151131740577792000, 16183501766885376000000, 999942682759884864000000

Offset: 0

Author

Clark Kimberling, Aug 18 2024

Keywords

• nonn

Comments

See A374848 for the definition of obverse convolution and a guide to related sequences.

Crossrefs

Cf. A000027, A000201, A001622, A374848.

Programs

Mathematica

r = GoldenRatio;
s[n_] := n; t[n_] := Floor[n*r];
u[n_] := Product[s[k] + t[n - k], {k, 0, n}]
Table[u[n], {n, 0, 22}]