A121321 -id:A121321 - cp's OEIS frontend

A190682 Squares whose squares contain every digit at least once.

582169, 588289, 1136356, 1183744, 1454436, 1700416, 2030625, 2424249, 2436721, 2669956, 2732409, 2930944, 3024121, 3175524, 3305124, 3381921, 3481956, 3526884, 3900625, 4129024, 4182025, 4223025, 4553956, 4804864, 4981824

Offset: 1

Bruno Berselli, May 17 2011

Squares in A054038.

			a(2) = A054038(2225) = 588289 = 767^2.

Giovanni Resta, Table of n, a(n) for n = 1..10000 (first 2000 terms from Bruno Berselli)

[ n^2: n in [0..2232] | Seqset(Intseq(n^4)) eq {0..9} ];

a(n) = A121321(n)^2.

A345875 Numbers whose fourth powers are zeroless pandigital.

Original entry on oeis.org

608, 809, 897, 924, 1166, 1241, 1458, 1459, 1506, 1547, 1718, 1729, 1832, 1932, 1977, 1982, 2112, 2162, 2179, 2188, 2211, 2279, 2283, 2291, 2296, 2336, 2337, 2408, 2427, 2541, 2592, 2594, 2613, 2634, 2684, 2689, 2704, 2764, 2776, 2779, 2854, 2941, 2984, 2988, 3009

Offset: 1

Tanya Khovanova, Jun 27 2021

Zeroless pandigital means that it contains all the digits 1 through 9, but doesn't contain a zero.

			608^4 = 136651472896. Thus, 608 belongs to this sequence.

Alois P. Heinz, Table of n, a(n) for n = 1..10000

Cf. A071519 (for squares), A124628 (for cubes).

Subsequence of A121321 (4th power is pandigital).

q:= n-> is({convert(n^4, base, 10)[]}={$1..9}):
select(q, [$1..3000])[];  # Alois P. Heinz, Jun 29 2021

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

isok(k) = my(d=digits(k^4)); vecmin(d) && (#Set(d) == 9); \\ Michel Marcus, Jun 30 2021

def ok(n): return set(str(n**4)) == set("123456789")
print(list(filter(ok, range(3000)))) # Michael S. Branicky, Jun 27 2021

cp's OEIS Frontend

A190682 Squares whose squares contain every digit at least once.

Views

Author

Keywords

Comments

Examples

Links

Programs

Magma

Formula

A345875 Numbers whose fourth powers are zeroless pandigital.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Python