OFFSET
1,1
COMMENTS
These numbers are related to the divergent series r sum(n^(1/k) = n^1/2 + n^1/3 + ...n^1/r for abs(n) > 0 and r=sqrt(n). k=2
FORMULA
a(n) = A089361(10^n) = sum_{p = 2..inf} [floor(10^(n/p)) - 1]. - David Wasserman, Sep 14 2005
EXAMPLE
There are 16 perfect powers <= 100: 2^2, 2^3, 3^2, 2^4, 4^2, 5^2, 3^3, 2^5, 6^2, 7^2, 2^6, 4^3, 8^2, 3^4, 9^2, 10^2
PROG
(PARI) plessn10(n, m) = { for(k=1, n, s=0; z = 10^k; r = floor(sqrt(z)); for(x=m, r, for(y=2, r, p = floor(x^y); if(p<=z, s++) ) ); print1(s", ") ) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Dec 27 2003
EXTENSIONS
More terms from David Wasserman, Sep 14 2005
STATUS
approved