OFFSET
1,1
COMMENTS
Sum of first 3n terms = 10^n.
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..300
EXAMPLE
a(3) = 5 as there are 5 three-digit cubes: 125, 216, 343, 512 and 729.
MAPLE
r:= proc(n, k) local b; b:= iroot(n, k); b+`if`(b^k<n, 1, 0) end:
a:= n-> r(10^n, 3) -r(10^(n-1), 3) +`if`(n=1, 1, 0):
seq(a(n), n=1..40); # Alois P. Heinz, Sep 12 2012
PROG
(PARI) { default(realprecision, 300); p=1; b=-1; for (n=1, 300, p*=10; c=b; b=floor((p - 1)^(1/3)); write("b062941.txt", n, " ", b - c) ) } \\ Harry J. Smith, Aug 14 2009
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Jul 07 2001
EXTENSIONS
Corrected and extended by Dean Hickerson, Jul 10 2001
Offset changed from 0 to 1 by Harry J. Smith, Aug 14 2009
STATUS
approved