A374862 Obverse convolution A000201**A000201; see Comments.

0, 1, 18, 256, 5400, 153664, 4251528, 146410000, 5159780352, 215051077696, 10497600000000, 516094438514944, 28802430771288192, 1806336000000000000, 113638807576776480768, 7916729578225695719424, 558793544769287109375000, 42995640737555012867053824

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. a(2k+1) is a square for k>=0.

Crossrefs

Cf. A000201, A001622, A374848.

Programs

Mathematica

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