OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
Ilya Gutkovskiy, Scatter plot of a(n) up to n=50000
MAPLE
f:= proc(n) option remember;
procname(n-procname(floor(n/2)))+procname(n-procname(floor(n/4)))
end proc:
f(0):= 1;
map(f, [$0..100]); # Robert Israel, Dec 02 2019
MATHEMATICA
a[n_] := a[n] = a[n - a[Floor[n/2]]] + a[n - a[Floor[n/4]]]; a[0] = 1; Table[a[n], {n, 0, 75}]
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Ilya Gutkovskiy, May 13 2018
STATUS
approved