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 A133160 #16 Sep 08 2022 08:45:31 %S A133160 2,6,9,11,12,17,20,23,27,29,33,38,48,50,53,59,62,68,71,75,81,87,92,93, %T A133160 101,114,123,129,137,152,153,170,171,176,186,197,198,222,225,246,248, %U A133160 254,258,263,270,284,288,293,296,297,303,306,309,314,321,324,332,335 %N A133160 Numbers k such that k^3 + k + 91 is prime. %H A133160 Daniel Starodubtsev, <a href="/A133160/b133160.txt">Table of n, a(n) for n = 1..10000</a> %e A133160 2 is in the sequence because 2^3+2+91 = 101 is prime. %e A133160 93 is in the sequence because 93^3+93+91 = 804541 is prime. %p A133160 a:=proc(n) if isprime(n^3+n+91)=true then n else end if end proc: seq(a(n),n =1..300); # _Emeric Deutsch_, Jan 08 2008 %t A133160 Select[Range[400], PrimeQ[ #^3 + # + 91] &] (* _Stefan Steinerberger_, Dec 24 2007 *) %o A133160 (Magma) [ n: n in [0..400] | IsPrime(n^3+n+91) ]; // _Vincenzo Librandi_, Jan 31 2011 %o A133160 (PARI) is(n)=isprime(n^3+n+91) \\ _Charles R Greathouse IV_, Jun 06 2017 %Y A133160 Cf. A002837. %K A133160 nonn,easy %O A133160 1,1 %A A133160 _Parthasarathy Nambi_, Dec 17 2007 %E A133160 More terms from _Stefan Steinerberger_, Dec 24 2007