A059208 -id:A059208 - cp's OEIS frontend

A059007 Numbers m such that m^2 reversed is a prime.

4, 14, 19, 28, 32, 37, 38, 40, 41, 62, 85, 89, 95, 97, 106, 119, 136, 139, 140, 190, 193, 196, 266, 271, 274, 277, 280, 281, 313, 316, 320, 325, 328, 331, 334, 335, 353, 355, 361, 362, 370, 373, 377, 380, 383, 397, 398, 400, 401, 403, 410, 412, 421, 434, 439

Offset: 1

Robert G. Wilson v, Jan 16 2001

			28 is in the sequence because the reverse of 28^2 is 487 which is a prime. - _Indranil Ghosh_, Feb 10 2017

Indranil Ghosh, Table of n, a(n) for n = 1..10000 (terms 0..1000 from T. D. Noe)

Cf. A007488.

Numbers m such that m^k reversed is a prime: A059008 (k=3), A059205 (k=4), A059206 (k=5), A059207 (k=6), A059208 (k=7), A059209 (k=8), A059210 (k=9), A059211 (k=10), A059212 (k=11), A059213 (k=12).

[n: n in [1..500] | IsPrime(Seqint(Reverse(Intseq(n^2))))]; // Marius A. Burtea, Jan 12 2019

Select[ Range[ 1000 ], PrimeQ[ ToExpression[ StringReverse[ ToString[ #^2 ] ] ] ] & ]
Select[Range[500],PrimeQ[IntegerReverse[#^2]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 10 2019 *)

isok(n) = isprime(fromdigits(Vecrev(digits(n^2)))); \\ Michel Marcus, Jan 12 2019

A058994 Numbers m such that 7^m reversed is prime.

Original entry on oeis.org

1, 12, 24, 225, 392, 819, 1201, 1645, 1775, 37578

Offset: 1

Robert G. Wilson v, Jan 17 2001

Cf. A059208, A071584.

Numbers m such that k^m reversed is prime: A057708 (k=2), A350441 (k=4), A058993 (k=5), this sequence (k=7), A350442 (k=8), A058995 (k=13).

Do[ If[ PrimeQ[ ToExpression[ StringReverse[ ToString[7^n] ] ] ], Print[n] ], {n, 1, 2500} ]

isok(m) = isprime(fromdigits(Vecrev(digits(7^m)))) \\ Mohammed Yaseen, Jul 20 2022

from sympy import isprime
k, m, A058994_list = 1, 7,  []
while k <= 10**3:
    if isprime(int(str(m)[::-1])):
        A058994_list.append(k)
    k += 1
    m *= 7 # Chai Wah Wu, Mar 09 2021

a(10) from Michael S. Branicky, Mar 16 2025

A059700 Primes p such that p^7 reversed is also prime.

Original entry on oeis.org

2, 29, 41, 71, 79, 151, 193, 257, 359, 379, 389, 607, 739, 773, 1019, 1049, 1217, 1409, 1427, 1481, 1667, 1997, 2297, 2551, 2593, 3181, 3253, 3701, 3821, 3851, 3967, 4003, 4421, 5107, 5209, 5231, 5381, 5441, 5503, 6173, 6203, 6221, 6229, 6271, 7433, 7603

Offset: 1

Robert G. Wilson v, Feb 06 2001

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Cf. A059208.

[p: p in PrimesUpTo(8000) | IsPrime(Seqint(Reverse(Intseq(p^7))))]; // _Vincenzo Librandi: Apr 12 2013

Select[ Range[ 10000 ], PrimeQ[ # ] && PrimeQ[ ToExpression[ StringReverse[ ToString[ #^7 ] ] ] ] & ]

cp's OEIS Frontend

A059007 Numbers m such that m^2 reversed is a prime.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Magma

Mathematica

PARI

A058994 Numbers m such that 7^m reversed is prime.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

PARI

Python

Extensions

A059700 Primes p such that p^7 reversed is also prime.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica