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 A230506 #11 Apr 17 2016 09:27:30 %S A230506 1,2,5,6,9,11,20,21,26,29,30,35,44,86,95,96,99,111,120,134,140,165, %T A230506 186,191,204,221,231,249,260,299,321,330,354,375,380,384,386,431,440, %U A230506 455,485,491,506,515,545,551,554,596,600,629 %N A230506 Numbers n with 2*n + 1 and 2*n^3 + 1 both prime. %C A230506 This sequence is interesting because of the conjecture in the comments in A230507. %H A230506 Zhi-Wei Sun, <a href="/A230506/b230506.txt">Table of n, a(n) for n = 1..10000</a> %e A230506 a(1) = 1 since 2*1 + 1 = 2*1^3 + 1 = 3 is a prime. %e A230506 a(2) = 2 since 2*2 + 1 = 5 and 2*2^3 + 1 = 17 are both prime. %t A230506 q[n_]:=PrimeQ[2n+1]&&PrimeQ[2n^3+1] %t A230506 m=0 %t A230506 Do[If[q[n],m=m+1;Print[m," ",n]],{n,1,629}] %Y A230506 Cf. A000040, A005097, A201107, A230507. %K A230506 nonn %O A230506 1,2 %A A230506 _Zhi-Wei Sun_, Oct 21 2013