A383150 a(n) = Sum_{k=0..n} k^3 * (-1)^k * 3^(n-k) * binomial(n,k).

0, -1, 2, 18, 64, 160, 288, 224, -1024, -6912, -28160, -95744, -294912, -851968, -2351104, -6266880, -16252928, -41222144, -102629376, -251527168, -608174080, -1453326336, -3437232128, -8055160832, -18723373056, -43201331200, -99019128832, -225586446336

Offset: 0

Author

Seiichi Manyama, Apr 18 2025

Keywords

• sign
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..700

Crossrefs

Cf. A001787, A178987, A383151, A383152, A383155.

Programs

Magma

[2^(n-3) * (-12*n+9*n^2-n^3): n in [0..30]]; // Vincenzo Librandi, May 02 2025

Mathematica

Table[2^(n-3)*(-12*n+9*n^2-n^3),{n,0,30}] (* Vincenzo Librandi, May 02 2025 *)

PARI

a(n) = 2^(n-3)*(-12*n+9*n^2-n^3);

Formula

a(n) = 2^(n-3) * (-12*n + 9*n^2 - n^3).