A099197 a(n) = (n^2)*(2*n^8+120*n^6+1806*n^4+7180*n^2+5067)/14175.

0, 1, 20, 201, 1360, 7001, 29364, 104881, 329024, 927441, 2390004, 5707449, 12767184, 26986089, 54284244, 104535009, 193664256, 346615329, 601446996, 1014889769, 1669752016, 2684641785, 4226553716, 6526963345, 9902174016, 14778775025, 21725194036, 31490462745

Offset: 0

Author

Jonathan Vos Post, Nov 16 2004

Keywords

• easy
• nonn

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..10000 (terms 0..1000 from T. D. Noe)
• Hyun Kwang Kim, On Regular Polytope Numbers, Proc. Amer. Math. Soc., 131 (2003), 65-75.
• Index entries for linear recurrences with constant coefficients, signature (11,-55,165,-330,462,-462,330,-165,55,-11,1).

Crossrefs

Similar sequences: A005900 (m=3), A014820(n-1) (m=4), A069038 (m=5), A069039 (m=6), A099193 (m=7), A099195 (m=8), A099196 (m=9).

Cf. A000332.

Programs

Mathematica

A099197[n_] := n^2*(2*n^2*(n^6 + 60*n^4 + 903*n^2 + 3590) + 5067)/14175;
Array[A099197, 30, 0] (* Paolo Xausa, Jan 29 2025 *)

PARI

a(n)=n^2*(2*n^8+120*n^6+1806*n^4+7180*n^2+5067)/14175 \\ Charles R Greathouse IV, Oct 16 2015

Formula

a(n) = (n^2)*(2*n^8+120*n^6+1806*n^4+7180*n^2+5067)/14175.