login
A366150
a(n) = A366149(n, n).
2
1, 1, 8, 190, 9080, 725320, 87067520, 14652451360, 3291452374400, 951504315644800, 344097665398707200, 152191547632887731200, 80821740082953347993600, 50749489515964112842240000, 37193794460546391363092480000, 31464706192542487393274091520000
OFFSET
0,3
COMMENTS
This a weighted generalized Catalan sequence (A365673) with the heptagonal numbers as weights.
MAPLE
# Using function T from A366149.
a := n -> T(n, n): seq(a(n), n = 0..16);
MATHEMATICA
A366149[n_, k_]:=A366149[n, k]=Which[k==0, 1, k==n, A366149[n, k-1], True, PolygonalNumber[7, n-k+1]A366149[n, k-1]+A366149[n-1, k]];
Array[A366149[#, #]&, 20, 0] (* Paolo Xausa, Jan 01 2024 *)
CROSSREFS
Sequence in context: A272529 A198282 A177147 * A251669 A158654 A275995
KEYWORD
nonn
AUTHOR
Peter Luschny, Oct 01 2023
STATUS
approved