A342308 Numbers whose fifth powers are zeroless pandigital.

193, 353, 398, 678, 695, 697, 744, 768, 776, 793, 868, 883, 966, 968, 983, 1045, 1075, 1079, 1089, 1097, 1098, 1114, 1129, 1148, 1186, 1193, 1212, 1291, 1311, 1403, 1405, 1442, 1544, 1576, 1584, 1643, 1715, 1734, 1746, 1775, 1795, 1853, 1868, 1888, 1917, 1944, 1953, 1971, 1974, 1996

Offset

1,1

Comments

Numbers n such that A000584(n) is in { A050289 }.

Links

David A. Corneth, Table of n, a(n) for n = 1..10000

Example

193^5 = 267785184193, and contains all the digits 1 through 9.

Maple

q:= n-> is({convert(n^5, base, 10)[]}={$1..9}):
select(q, [$1..2000])[];  # Alois P. Heinz, Mar 08 2021

Mathematica

Select[Range[2000],
Sort[ Union[IntegerDigits[#^5]]] == {1, 2, 3, 4, 5, 6, 7, 8, 9} &]

Prog

(Python)
A342308_list = [n for n in range(1, 10**5) if set(str(n**5)) == {'1', '2', '3', '4', '5', '6', '7', '8', '9'}] # Chai Wah Wu, Mar 08 2021
(PARI) isok(m) = my(d=digits(m^5)); vecmin(d) && (#Set(d) == 9); \\ Michel Marcus, Mar 09 2021

Crossrefs

Cf. A000584, A050289.

Sequence in context: A238667 A216451 A139506 * A147171 A146824 A256348

Adjacent sequences: A342305 A342306 A342307 * A342309 A342310 A342311

Keyword

nonn,base

Author

Tanya Khovanova, Mar 08 2021

Status

approved