%I #8 Nov 21 2013 12:48:39
%S 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,
%T 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,
%U 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
%N Number of cubes <= n-th prime.
%H Vincenzo Librandi, <a href="/A104147/b104147.txt">Table of n, a(n) for n = 0..1000</a>
%t Floor[Power[#, (3)^-1]]+1&/@Prime[Range[100]] (* _Harvey P. Dale_, Feb 01 2012 *)
%K easy,nonn
%O 0,1
%A _Giovanni Teofilatto_, Mar 08 2005