A373868 Integers that are not perfect fifth powers.

2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70

Offset: 1

Author

Chai Wah Wu, Jun 19 2024

Keywords

• nonn
• easy

Comments

Complement of A000584.

Links

• A. J. dos Reis and D. M. Silberger, Generating nonpowers by formula, Math. Mag., 63 (1990), 53-55.

Crossrefs

Cf. A000037, A000583, A000584, A007412, A140823.

Programs

Mathematica

Complement[Range[#^5], Range[#]^5] & [3] (* Paolo Xausa, Jul 03 2024 *)

Python

from sympy import integer_nthroot
def A373868(n): return n+(k:=integer_nthroot(n, 5)[0])+(n>=(k+1)**5-k)