OFFSET
1,1
COMMENTS
Conjecture: this sequence is finite and complete
MAPLE
select(n -> numtheory:-pi(floor((n+1)^(3/2))) = numtheory:-pi(ceil(n^(3/2)-1)), [$1..10000]); # Robert Israel, Feb 02 2016
MATHEMATICA
a = {}; k = 3/2; Do[If[Length[Select[Range[Ceiling[n^k], Floor[(n + 1)^k]], PrimeQ]] == 0, Print[n]; AppendTo[a, n]], {n, 10000}]; a
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Sep 11 2008
STATUS
approved