OFFSET
0,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (1,4,-4,-6,6,4,-4,-1,1).
FORMULA
a(n) = A014494(n + 1)^2. - Sean A. Irvine, Nov 18 2018
From G. C. Greubel, Jul 24 2019: (Start)
G.f.: 4*x*(9 +16*x +135*x^2 +64*x^3 +135*x^4 +16*x^5 +9*x^6)/((1-x)^5*(1+x)^4).
E.g.f.: x*(35+41*x+36*x^2+4*x^3)*cosh(x) + (1+9*x+77*x^2+28*x^3+4*x^4)* sinh(x). (End)
From Amiram Eldar, Mar 06 2022: (Start)
Sum_{n>=0} 1/a(n) = 7*Pi^2/12 + 2*Pi - 12.
Sum_{n>=0} (-1)^n/a(n) = 12 - 4*G - 12*log(2), where G is Catalan's constant (A006752). (End)
MATHEMATICA
Select[Accumulate[Range[100]], EvenQ]^2 (* Harvey P. Dale, Oct 09 2012 *)
PROG
(PARI) vector(30, n, ((2*n+1)*(2*n+1-(-1)^n))^2/4) \\ G. C. Greubel, Jul 24 2019
(Magma) [((2*n+1)*(2*n+1-(-1)^n))^2/4: n in [1..30]]; // G. C. Greubel, Jul 24 2019
(Sage) [((2*n+1)*(2*n+1-(-1)^n))^2/4 for n in (1..30)] # G. C. Greubel, Jul 24 2019
(GAP) List([1..30], n-> ((2*n+1)*(2*n+1-(-1)^n))^2/4); # G. C. Greubel, Jul 24 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
More terms from James A. Sellers
STATUS
approved