OFFSET
0,3
COMMENTS
Bounded, conjectured maximum is a(257) = 17.
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
MAPLE
A[0]:= 0;
for n from 1 to 1000 do
if n mod 3 = 0 and A[n/3] mod 3 = 0 then A[n]:= A[n/3]/3
else A[n]:= A[n-1]+1
fi od:
seq(A[i], i=0..1000); # Robert Israel, Apr 25 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved