A030082 -id:A030082 - cp's OEIS frontend

A030080 Primes p such that digits of p appear in p^3.

5, 11, 29, 59, 61, 67, 71, 73, 97, 101, 109, 137, 151, 191, 229, 233, 251, 281, 311, 331, 337, 347, 389, 401, 449, 467, 499, 541, 619, 641, 683, 701, 719, 733, 751, 769, 787, 829, 881, 883, 887, 919, 947, 977, 991, 997, 1009, 1013, 1019, 1021

Offset: 1

Patrick De Geest

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Primes in A029776.

Cf. A030082.

Select[Prime[Range[200]],Intersection[IntegerDigits[#],IntegerDigits[#^3]]==Union[IntegerDigits[#]]&] (* Harvey P. Dale, Apr 23 2025 *)

Offset changed by Andrew Howroyd, Aug 13 2024

A342349 a(n) = p^3 where p is prime and digits of p counted with multiplicity appear in a(n).

Original entry on oeis.org

125, 1331, 24389, 205379, 226981, 300763, 357911, 389017, 912673, 1030301, 1295029, 2571353, 12649337, 15813251, 22188041, 38272753, 41781923, 58863869, 64481201, 101847563, 124251499, 158340421, 237176659, 263374721, 318611987, 344472101, 371694959, 393832837

Offset: 1

Chai Wah Wu, Mar 17 2021

Subsequence of A030082. Coincides with A030082(n) for 1 <= n <= 12.

			a(13) = 12649337 = 233^3. 233 is prime and 12649337 contains one digit '2' and two digits '3'.

Cf. A030082.

from multiset import Multiset
from sympy import prime
A342349_list = []
for i in range(1,10**6):
    p = prime(i)
    q = p**3
    if Multiset(str(p)) <= Multiset(str(q)):
        A342349_list.append(q)

cp's OEIS Frontend

A030080 Primes p such that digits of p appear in p^3.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

Extensions

A342349 a(n) = p^3 where p is prime and digits of p counted with multiplicity appear in a(n).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Python