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.
%I A176685 #9 Feb 28 2020 09:52:11 %S A176685 36,114,174,264,426,444,810,894,900,2724,3876,4140,4386,4446,4686, %T A176685 4884,5910,5940,6240,6294,6534,6624,7044,7206,7314,7326,7470,8076, %U A176685 8676,9120,9216,9270,9546,9900,10926,11040,11934,12114,12510,14004,14034,14100 %N A176685 Numbers k such that k^3 +-7 are primes. %H A176685 Daniel Starodubtsev, <a href="/A176685/b176685.txt">Table of n, a(n) for n = 1..10000</a> %e A176685 36 is in the sequence, because 36^3 - 7 = 46649 and 36^3 + 7 = 46663 are primes. %t A176685 Select[Range[8! ],PrimeQ[ #^3-7]&&PrimeQ[ #^3+7]&] %t A176685 Select[Range[15000],AllTrue[#^3+{7,-7},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jan 28 2020 *) %Y A176685 Cf. A090121, A097698, A108701, A143904, A176681, A176682, A176683, A176684 %K A176685 nonn %O A176685 1,1 %A A176685 _Vladimir Joseph Stephan Orlovsky_, Apr 23 2010