A030084 Primes p such that all digits of p^3 appear in p.

1035743, 1045573, 1215397, 1396247, 1642309, 2031487, 2149573, 2363149, 2385961, 2458019, 2569751, 2815973, 2857319, 2986301, 3109867, 3349517, 3482461, 3530467, 3865079, 4332871, 4387291, 4631489, 4893617, 5170283

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..2000

Maple

filter:= proc(p) isprime(p) and convert(convert(p^3, base, 10), set) subset convert(convert(p, base, 10), set) end proc:
select(filter, [seq(i, i=3..3*10^6, 2)]); # Robert Israel, Nov 01 2023

Crossrefs

Includes A050288.

Cf. A030083.

Sequence in context: A235722 A115497 A205925 * A030092 A237073 A364266

Adjacent sequences: A030081 A030082 A030083 * A030085 A030086 A030087

Keyword

nonn,base

Author

Patrick De Geest

Extensions

Offset corrected by Robert Israel, Nov 01 2023

Status

approved