OFFSET
0,2
FORMULA
a(n) = Sum_{k=0..n} binomial(n,k) * binomial(k,floor(k/2)) * 3^k.
a(n) ~ 7^(n + 1/2) / sqrt(3*Pi*n). - Vaclav Kotesovec, Nov 26 2021
MATHEMATICA
nmax = 22; CoefficientList[Series[Exp[x] (BesselI[0, 6 x] + BesselI[1, 6 x]), {x, 0, nmax}], x] Range[0, nmax]!
Table[Sum[Binomial[n, k] Binomial[k, Floor[k/2]] 3^k, {k, 0, n}], {n, 0, 22}]
PROG
(PARI) a(n) = sum(k=0, n, binomial(n, k) * binomial(k, k\2) * 3^k); \\ Michel Marcus, Nov 21 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Nov 21 2021
STATUS
approved