OFFSET
1,1
COMMENTS
Sequence is infinite. If k is a member then so is k^3. Subsidiary sequence: fourth powers sandwiched between two numbers divisible by fourth powers.
EXAMPLE
4913 = 17^3 is a term since 4912 is divisible by 8 and 4914 is divisible by 27.
MATHEMATICA
Select[Range[2, 1000], Last[Union[Transpose[FactorInteger[ #^3 - 1]][[2]]]] > 2 && Last[Union[Transpose[FactorInteger[ #^3 + 1]][[2]]]] > 2 &]^3 - Tanya Khovanova, Sep 08 2007
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 22 2003
EXTENSIONS
Corrected and extended by Ray Chandler, Sep 27 2003
Offset changed by Andrew Howroyd, Sep 22 2024
STATUS
approved