This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A201053 Nearest cube. 8
 0, 1, 1, 1, 1, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,6 COMMENTS a(n) = if n-A048763(n) < A048762(n)-n then A048762(n) else A048763(n); apart from 0, k^3 occurs 3*n^2+1 times, cf. A056107. LINKS Reinhard Zumkeller, Table of n, a(n) for n = 0..10000 FORMULA G.f.: (1-x)^(-1)*Sum_{k>=0} (3*k^2+3*k+1)*x^((k+1)*(k^2+k/2+1)). - Robert Israel, Jan 03 2017 MAPLE seq(k^3 \$ (3*k^2+1), k=0..10); # Robert Israel, Jan 03 2017 MATHEMATICA Module[{nn=70, c}, c=Range[0, Ceiling[Surd[nn, 3]]]^3; Flatten[Array[ Nearest[ c, #]&, nn, 0]]] (* Harvey P. Dale, May 27 2014 *) PROG (Haskell) a201053 n = a201053_list !! n a201053_list = 0 : concatMap (\x -> replicate (a056107 x) (x ^ 3)) [1..] CROSSREFS Cf. A061023, A074989, A053187 (nearest square), A000578. Sequence in context: A195139 A010731 A048762 * A160949 A245401 A048763 Adjacent sequences:  A201050 A201051 A201052 * A201054 A201055 A201056 KEYWORD nonn,look AUTHOR Reinhard Zumkeller, Nov 28 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 20 22:22 EDT 2019. Contains 322310 sequences. (Running on oeis4.)