%I #5 Nov 29 2014 16:21:34
%S 9,26,35,65,91,133,169,215,217,218,335,341,386,407,469,485,511,559,
%T 721,737,793,817,866,973,1027,1115,1141,1241,1261,1267,1339,1343,1385,
%U 1387,1538,1603,1685,1727,1843,1853,1981,2071,2189,2402,2413,2611,2743,2771
%N Semiprimes that can be expressed as the sum or difference of two cubes: intersection of A001358 and A045980.
%H Charles R Greathouse IV, <a href="/A085367/b085367.txt">Table of n, a(n) for n = 1..10000</a>
%e a(1)=9 because 2^3+1^3=3*3, a(2)=26=3^3-1^3=2*13.
%e a(5)=91 is the smallest semiprime expressible in two different ways: 91=4^3+3^3=6^3-5^3=7*13.
%o (PARI) T=thueinit('z^3+1);
%o is(n)=bigomega(n)==2 && #thue(T, n)
%o list(lim)=my(v=List()); forprime(p=2,lim\2, forprime(q=2,min(lim\p,p), if(#thue(T, p*q), listput(v,p*q)))); Set(v) \\ _Charles R Greathouse IV_, Nov 29 2014
%Y Cf. A001358, A045980, A085366.
%K nonn
%O 1,1
%A _Hugo Pfoertner_, Jun 25 2003
|