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

1, 0, -1, -2, -2, 1, 10, 29, 63, 117, 191, 265, 264, -12, -1014, -3654, -9634, -21929, -45424, -87551, -158289, -267616, -415513, -563200, -561430, 12625, 2202084, 8368243, 23532027, 57848882, 131000395, 279675274, 569701663, 1114392742, 2099105261, 3805794420

Offset

0,4

Links

Seiichi Manyama, Table of n, a(n) for n = 0..3000

Mathematica

a[n_] := Sum[(-1)^k * Binomial[n, k^2], {k, 0, n}]; Array[a, 36, 0] (* Amiram Eldar, May 20 2021 *)

Prog

(PARI) {a(n) = sum(k=0, sqrtint(n), (-1)^k*binomial(n, k^2))}

Crossrefs

Cf. A000196, A003099, A307094.

Sequence in context: A182002 A184251 A262348 * A327087 A088876 A346078

Adjacent sequences: A307090 A307091 A307092 * A307094 A307095 A307096

Keyword

sign

Author

Seiichi Manyama, Mar 24 2019

Status

approved