%I #8 Apr 23 2023 13:33:22
%S 4,7,40,49,59,70,85,125,134,223,226,268,287,292,334,335,398,400,422,
%T 452,488,490,559,590,595,700,826,850,907,923,926,992,1016,1021,1109,
%U 1231,1250,1340,1475,1477,1537,1763,1792,1798,1819,1972,2108,2168,2215
%N Numbers n such that n^12 reversed is a prime.
%H G. C. Greubel, <a href="/A059213/b059213.txt">Table of n, a(n) for n = 1..13000</a>
%t Select[Range[3000], PrimeQ[ToExpression[StringReverse[ToString[#^12]]]] &]
%t Select[Range[2300],PrimeQ[IntegerReverse[#^12]]&] (* _Harvey P. Dale_, Apr 23 2023 *)
%K nonn,base
%O 1,1
%A _Robert G. Wilson v_, Jan 16 2001