cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A058995 Numbers m such that 13^m reversed is prime.

This page as a plain text file.
%I A058995 #17 Apr 02 2023 08:17:35
%S A058995 1,379,467,479,1325,7144,10311,26079
%N A058995 Numbers m such that 13^m reversed is prime.
%t A058995 Do[ If[ PrimeQ[ ToExpression[ StringReverse[ ToString[13^n] ] ] ], Print[n] ], {n, 1, 2300} ]
%t A058995 Select[Range[1400],PrimeQ[IntegerReverse[13^#]]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 18 2020 *)
%o A058995 (Python)
%o A058995 from sympy import isprime
%o A058995 k, m, A058995_list = 1, 13,  []
%o A058995 while k <= 10**3:
%o A058995     if isprime(int(str(m)[::-1])):
%o A058995         A058995_list.append(k)
%o A058995     k += 1
%o A058995     m *= 13 # _Chai Wah Wu_, Mar 09 2021
%o A058995 (PARI) isok(m) = isprime(fromdigits(Vecrev(digits(13^m)))) \\ _Mohammed Yaseen_, Jul 21 2022
%Y A058995 Numbers m such that k^m reversed is prime: A057708 (k=2), A350441 (k=4), A058993 (k=5), A058994 (k=7), A350442 (k=8), this sequence (k=13).
%K A058995 nonn,base,more
%O A058995 1,2
%A A058995 _Robert G. Wilson v_, Jan 17 2001
%E A058995 a(6)-a(7) from _Chai Wah Wu_, Mar 09 2021
%E A058995 a(8) from _Michael S. Branicky_, Apr 01 2023