login
A380522
Primes p such that between p and the previous prime there exist 2 distinct integers which are a square and a cube, respectively.
3
11, 29, 127, 32771, 79531, 97367
OFFSET
1,1
COMMENTS
There are no other terms < 2*10^30.
EXAMPLE
127 is a term because between prime 127 and previous prime 113 there exists a square 121 and a cube 125.
MATHEMATICA
b[n_] := If[IntegerQ@Sqrt@n, 0, p = NextPrime[n^3];
If[Ceiling[Sqrt[NextPrime[p, -1]]]^2 >= p, 0, p]]; Select[Array[b@# &, 1000], # > 0 &]
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Zhining Yang, Jan 26 2025
STATUS
approved