cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A085367 Semiprimes that can be expressed as the sum or difference of two cubes: intersection of A001358 and A045980.

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