|
Search: id:A146899
|
|
|
| A146899 |
|
A additive term polynomial as a stand alone polynomial: t0(n,m)=If[Mod[2*Binomial[n, m], 2] - Mod[Binomial[n, m], 2] == 0, Binomial[n, m]/2, Binomial[n, m] + 1]; p(x,n)=Sum[t[n, m]*x^m*(1 + x^(n - 2*m)), {m, 1, n - 1}]/(2*x) |
|
+0 1
|
|
| 1, 4, 4, 2, 3, 2, 6, 5, 5, 6, 3, 16, 10, 16, 3, 8, 22, 36, 36, 22, 8, 4, 14, 28, 35, 28, 14, 4, 10, 18, 42, 63, 63, 42, 18, 10, 5, 46, 60, 105, 126, 105, 60, 46, 5
(list; graph; listen)
|
|
|
Search completed in 0.002 seconds
|