|
%I #7 Nov 19 2014 14:12:53
%S 343,1331,12167,29791,117649,205379,571787,1030301,5177717,8365427,
%T 12008989,22188041,24137569,30080231,31855013,33698267,41781923,
%U 42508549,43986977,49430863,59776471
%N Cubes that becomes a prime number when prefixed with a 9.
%H Harvey P. Dale, <a href="/A167733/b167733.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[400]^3,PrimeQ[FromDigits[Join[{9},IntegerDigits[#]]]]&] (* _Harvey P. Dale_, Nov 19 2014 *)
%K nonn,base
%O 1,1
%A _Claudio Meller_, Nov 10 2009
|
