OFFSET
0,6
LINKS
Winston de Greef, Table of n, a(n) for n = 0..10000
Cristina Ballantine and George Beck, Partitions enumerated by self-similar sequences, arXiv:2303.11493 [math.CO], 2023. See pp. 13-14.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
`if`(n::even, a(n/2), a(n-2)+a(n-3)))
end:
seq(a(n), n=0..70); # Alois P. Heinz, Mar 22 2023
PROG
(PARI) a(n) = if (n <= 1, return(n)); if (n%2, a(n-2) + a(n-3), a(n/2));
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Mar 22 2023
STATUS
approved