OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
Sungjin Kim, Mathematics Stack Exchange Question 3051676 (showing a(n)/n converges).
FORMULA
G.f. g(x) satisfies g(x) = -1 + (1 + x + x^2) g(x^3) + (1 + x^(1/2) + x) g(x^(3/2))/2 + (1 - x^(1/2) + x) g(-x^(3/2))/2. - Robert Israel, Apr 22 2016
MAPLE
a:= proc(n) option remember; procname(floor(n/3)) + procname(floor(2*n/3)) end proc:
a(0):= 1:
seq(a(n), n=0..100); # Robert Israel, Apr 22 2016
MATHEMATICA
a[0]=1; a[n_]:=a[n]=a[Floor[n/3]]+a[Floor[(2n)/3]]; Array[a, 80, 0] (* Harvey P. Dale, Jun 08 2018 *)
PROG
(PARI) a(n)={if(n==0, 1, a(n\3) + a(2*n\3))} \\ Andrew Howroyd, Feb 27 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Aug 06 2009
STATUS
approved