A104147 Number of cubes <= n-th prime.

2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9

Offset

0,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Mathematica

Floor[Power[#, (3)^-1]]+1&/@Prime[Range[100]] (* Harvey P. Dale, Feb 01 2012 *)

Crossrefs

Sequence in context: A025423 A284263 A087233 * A227568 A232746 A052146

Adjacent sequences: A104144 A104145 A104146 * A104148 A104149 A104150

Keyword

easy,nonn

Author

Giovanni Teofilatto, Mar 08 2005

Status

approved