A096297 a(1) = 3, a(n) = a(n-1) + 4*(a(n-1)-floor(a(n-1)^(1/3))^3).

3, 11, 23, 83, 159, 295, 611, 1007, 1035, 1175, 1875, 2463, 3527, 4135, 4291, 5071, 5703, 8863, 12315, 12907, 15867, 16835, 21675, 29643, 40215, 43859, 47795, 52351, 59143, 76227, 84783, 105887, 114143, 128347, 141735, 146243, 168783, 178415

Offset

1,1

Comments

A cubic version of the Weintraub recursion.

Links

Table of n, a(n) for n=1..38.

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

Sequence in context: A282198 A158034 A002515 * A081857 A168163 A120088

Adjacent sequences: A096294 A096295 A096296 * A096298 A096299 A096300

Keyword

nonn,easy

Author

Roger L. Bagula, Jun 20 2004

Extensions

Name edited by Michel Marcus, Jun 03 2019

Status

approved