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 A100358 #15 Sep 02 2014 11:46:01
%S A100358 0,2,6,8,20,38,96,146,236,458,726,962,1422,2864,3858,5228,9822,21774,
%T A100358 32336,33336,43556
%N A100358 Numbers n such that 2^n+n^3+1 is prime.
%C A100358 a(22) > 200000. - _Giovanni Resta_, Mar 23 2014
%C A100358 a(22) > 400000. - _Robert Price_, Sep 01 2014
%p A100358 A100358:=n->`if`(isprime(2^n+n^3+1),n,NULL): seq(A100358(n), n=0..10^3); # _Wesley Ivan Hurt_, Sep 01 2014
%t A100358 {ta={{0}}, tb={{0}}}; Do[g=n;s=2^n+n^3+1;If[PrimeQ[s], Print[n];ta=Append[ta, n];tb=Append[tb, s]], {n, 1, 10000}];{ta, tb, g}
%o A100358 (PARI)
%o A100358 for(n=1,10^5,if(ispseudoprime(2^n+n^3+1),print1(n,", "))) \\ _Derek Orr_, Sep 01 2014
%Y A100358 Cf. A001580, A069539, A100357.
%K A100358 more,nonn
%O A100358 1,2
%A A100358 _Labos Elemer_, Nov 19 2004
%E A100358 a(17)-a(21) from _Giovanni Resta_, Mar 23 2014