OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
H. J. J. te Riele, Iteration of number-theoretic functions, Nieuw Archief v. Wiskunde, (4) 1 (1983), 345-360. See Example III.3. [Apparently the sequence is discussed earlier in the same volume on page 80, where it is proved that under certain conditions the iterates of this function go to infinity (namely, if there are two consecutive non-multiples of 3).]
MATHEMATICA
a[n_] := If[Divisible[n, 3], n/3, Floor[n*Sqrt[3]]]; Array[a, 66] (* Amiram Eldar, Mar 17 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 17 2019
STATUS
approved