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.
%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