A088035 Cubes k such that k-1 is divisible by a cube >1.

729, 1000, 4913, 5832, 6859, 15625, 21952, 35937, 50653, 68921, 97336, 117649, 166375, 185193, 262144, 274625, 389017, 531441, 551368, 704969, 753571, 912673, 1000000, 1157625, 1295029, 1442897, 1643032, 1771561, 2000376, 2048383

Offset: 1

Author

Amarnath Murthy, Sep 19 2003

Keywords

• nonn

Crossrefs

Cf. A088036.

Programs

Mathematica

Select[Range[150]^3,Max[FactorInteger[#-1][[All,2]]]>2&] (* Harvey P. Dale, Aug 21 2017 *)

Formula

a(n) = A088036(n)^3. - R. J. Mathar, Dec 03 2015

Extensions

Corrected and extended by Ray Chandler, Sep 23 2003

Offset corrected by Andrew Howroyd, Sep 22 2024