OFFSET
1,1
COMMENTS
A cubic version of the Weintraub recursion.
LINKS
Steven H. Weintraub, An Interesting Recursion, Amer. Math. Monthly, v 111, no. 6, 2004, page 528.
MATHEMATICA
NestList[#+4(#-Floor[Surd[#, 3]]^3)&, 3, 40] (* Harvey P. Dale, Apr 16 2015 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Jun 20 2004
EXTENSIONS
Name edited by Michel Marcus, Jun 03 2019
STATUS
approved