OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..449
FORMULA
E.g.f.: (2*x+1)/((x-1)*(x+1)*(x^2-x-1))-(x*log((1-x)^2*(x+1)))/(-x^2+x+1)^2.
a(n) ~ n! * (3 + (-1)^n)/2. - Vaclav Kotesovec, Nov 17 2022
MAPLE
egf := (2*x+1)/((x-1)*(x+1)*(x^2-x-1))-(x*log((1-x)^2*(x+1)))/(-x^2+x+1)^2:
ser := series(egf, x, 22): seq(n!*coeff(ser, x, n), n = 0..20); # Peter Luschny, Nov 17 2022
PROG
(Maxima)
a(n):=factorial(n)*sum(1/binomial(n-k, k), k, 0, floor(n/2));
(SageMath)
def A358446(n):
print([A358446(n) for n in range(23)]) # Peter Luschny, Nov 17 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Kruchinin, Nov 16 2022
STATUS
approved