|
%I #9 Dec 29 2016 19:16:21
%S 32,131,223,245,320,382,476,541,596,625,632,746,769,772,775,791,808,
%T 811,829,893,967,1006,1021,1028,1058,1259,1304,1310,1351,1468,1622,
%U 1669,1679,1729,1736,1748,2072,2087,2089,2153,2188,2192,2203,2218,2219
%N Numbers n such that n^9 reversed is a prime.
%H G. C. Greubel, <a href="/A059210/b059210.txt">Table of n, a(n) for n = 1..11000</a>
%t Select[Range[3000], PrimeQ[ToExpression[StringReverse[ToString[#^9]]]] &]
%t Select[Range[3000],PrimeQ[FromDigits[Reverse[IntegerDigits[#^9]]]]&] (* _Harvey P. Dale_, Dec 29 2011 *)
%K nonn,base
%O 1,1
%A _Robert G. Wilson v_, Jan 16 2001
|
