Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

Revision History for A005232

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Expansion of (1-x+x^2)/((1-x)^2*(1-x^2)*(1-x^4)).
(history; published version)
#178 by N. J. A. Sloane at Sun Sep 03 10:42:29 EDT 2023
STATUS

proposed

approved

#177 by Robert C. Lyons at Sun Sep 03 10:18:54 EDT 2023
STATUS

editing

proposed

#176 by Robert C. Lyons at Sun Sep 03 10:18:31 EDT 2023
PROG

(PARI) {a(n) = (n^3 + 9*n^2 + (32-9*(n%2))*n + [48, 15, 36, 15][n%4+1]) / 48}; /* _\\ _Michael Somos_, Feb 01 2007 */

(PARI) {a(n) = my(s=1); if( n<-5, n = -6-n; s=-1); if( n<0, 0, s * polcoeff( (1 - x + x^2) / ((1 - x)^2 * (1 - x^2) * (1 - x^4)) + x * O(x^n), n))}; /* _\\ _Michael Somos_, Feb 01 2007 */

(pythonPython) a=lambda n: sum((k//2+1)*((n-k)//2+1) for k in range((n-1)//2+1))+(n+1)%2*(((n//4+1)*(n//4+2))//2) # Gabriel Burns, Nov 08 2016

STATUS

approved

editing

#175 by Alois P. Heinz at Sat Sep 02 14:33:20 EDT 2023
STATUS

proposed

approved

#174 by Jon E. Schoenfield at Sat Sep 02 14:18:05 EDT 2023
STATUS

editing

proposed

#173 by Jon E. Schoenfield at Sat Sep 02 14:17:56 EDT 2023
FORMULA

G.f.: (1/8)*(1/(1-x)^4+3/(1-x^2)^2+2/(1-x)^2/(1-x^2)+2/(1-x^4)) . - Vladeta Jovovic, Aug 05 2000

Euler transform of length 6 sequence [ 1, 2, 1, 1, 0, -1 ]. - Michael Somos, Feb 01 2007

a(2n+1) = A006918(2n+2)/2. a(2n) = (A006918(2n+1) + A008619(n))/2.;

a(2n) = (A006918(2n+1) + A008619(n))/2.

if n == 0 (mod 4, ), then a(n) = n*(n^2-3*n+8)/48;

if n == 1, 3 (mod 4, ), then a(n) = (n^2-1)*(n-3)/48;

if n == 2 (mod 4, ), then a(n) = (n-2)*(n^2-n+6)/48. (End)

a(n) = 2*a(n-1) - 2*a(n-3) + 2*a(n-4) - 2*a(n-5) + 2*a(n-7) - a(n-8) with a(0) = 1, a(1) = 1, a(2) = 3, a(3) = 4, a(4) = 8, a(5) = 10, a(6) = 16, a(7) = 20. - Harvey P. Dale, Oct 24 2012

STATUS

approved

editing

#172 by Charles R Greathouse IV at Wed Apr 13 13:25:17 EDT 2022
LINKS

Simon Plouffe, <a href="https://arxiv.org/abs/0911.4975">Approximations de séries génératrices et quelques conjectures</a>, Dissertation, Université du Québec à Montréal, 1992; arXiv:0911.4975 [math.NT], 2009.

Discussion
Wed Apr 13
13:25
OEIS Server: https://oeis.org/edit/global/2938
#171 by Alois P. Heinz at Wed May 12 10:54:06 EDT 2021
STATUS

reviewed

approved

#170 by Joerg Arndt at Wed May 12 10:13:31 EDT 2021
STATUS

proposed

reviewed

#169 by Andrew Howroyd at Wed May 12 09:44:16 EDT 2021
STATUS

editing

proposed