A259188 Primes p such that p, p^2 and p^3 are distinct-digit numbers.

2, 3, 5, 13, 17, 19, 29, 59, 73

Offset

1,1

Links

Table of n, a(n) for n=1..9.

Mathematica

Select[Prime[Range[50]], Max[Flatten[DigitCount/@{#, #^2, #^3}]]<2&] (* Harvey P. Dale, Aug 20 2019 *)

Crossrefs

Subsequence of A259187. Cf. A029743.

Sequence in context: A356196 A045312 A129672 * A173971 A095083 A236183

Adjacent sequences: A259185 A259186 A259187 * A259189 A259190 A259191

Keyword

base,nonn,fini,full

Author

Zak Seidov, Jun 20 2015

Status

approved