OFFSET
1,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..1000
FORMULA
G.f.: Sum((1-x)^2*x^(2*n-1)/((1-x-x^(2*n))*(1-x-x^(2*n-1))), n=1..infinity).
G.f.: Sum(x^k/((1-x)^k*(1+x^k)),k=1..infinity). - Vladeta Jovovic, Mar 02 2008
a(n) ~ 2^(n-1). - Vaclav Kotesovec, May 01 2014
MAPLE
b:= proc(n, i) option remember; `if`(n=0, irem(i, 2), add(
(t-> b(t, min(i, j, `if`(t>0, t, j))))(n-j), j=1..n))
end:
a:= n-> b(n$2):
seq(a(n), n=0..40); # Alois P. Heinz, Jul 26 2015
MATHEMATICA
Rest[ CoefficientList[ Series[ Expand[ Sum[(1 - x)^2*x^(2n - 1)/((1 - x - x^(2n))*(1 - x - x^(2n - 1))), {n, 35}]], {x, 0, 35}], x]] (* Robert G. Wilson v, Feb 05 2005 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Feb 04 2005
EXTENSIONS
More terms from Robert G. Wilson v, Feb 05 2005
STATUS
approved