%I #8 Sep 15 2016 07:47:19
%S 9,10,12,13,21,25,30,34,36,40,46,52,66,76,81,90,96,118,126,130,132,
%T 142,144,154,165,172,177,180,193,196,198,204,216,226,228,238,240,246,
%U 250,256,262,268,273,282,294,312,333,336,345,346,366,370,372,378,393,400
%N Numbers n such that n^3+1=p*q*r where p,q,r are distinct primes.
%C A115403 is a supersequence not requiring that p,q,r are distinct.
%H Vincenzo Librandi, <a href="/A119956/b119956.txt">Table of n, a(n) for n = 1..1000</a>
%e 9^3+1=2*5*73 a product of 3 distinct primes, so 9 is in the sequence.
%t Select[Range[400], Last/@FactorInteger[#^3 + 1] == {1, 1, 1}&] (* _Vincenzo Librandi_, Sep 15 2016 *)
%Y Cf. A115403.
%K nonn
%O 1,1
%A _James R. Buddenhagen_, Aug 02 2006
|