OFFSET
0,4
LINKS
Robert Israel, Table of n, a(n) for n = 0..1108
FORMULA
a(n) = -hypergeometric([1-n, n], [-n], -2) if n>0. - Peter Luschny, Nov 30 2014
(4 + 8*n)*a(n) + (-10 - 23*n)*a(n + 1) + (-3*n - 6)*a(n + 2) = 0. - Robert Israel, Aug 22 2025
MAPLE
f:= gfun:-rectoproc({(4 + 8*n)*a(n) + (-10 - 23*n)*a(n + 1) + (-3*n - 6)*a(n + 2), a(0) = 1, a(1) = -1, a(2) = 1}, a(n), remember):
map(f, [$0..40]); # Robert Israel, Aug 22 2025
PROG
(SageMath)
def a(n):
if n==0: return 1
return -hypergeometric([1-n, n], [-n], -2).simplify()
[a(n) for n in range(21)] # Peter Luschny, Nov 30 2014
CROSSREFS
KEYWORD
easy,sign
AUTHOR
Paul Barry, Sep 05 2006
STATUS
approved
