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 A218456 #16 May 03 2018 18:58:20
%S A218456 -13633,-7121,-1223,4073,8779,12907,16469,19477,21943,23879,25297,
%T A218456 26209,26627,26563,26029,25037,23599,21727,19433,16729,13627,10139,
%U A218456 6277,2053,-2521,-7433,-12671,-18223,-24077,-30221,-36643,-43331,-50273,-57457
%N A218456 2*n^3 - 313*n^2 + 6823*n - 13633.
%C A218456 A prime-producing cubic polynomial. Produces 79 distinct primes if we scan the absolute values of the first 100 terms..
%H A218456 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1).
%F A218456 G.f.: (20771*x^3-54537*x^2+47411*x-13633)/(x-1)^4. [_Colin Barker_, Nov 10 2012]
%t A218456 Table[2n^3-313n^2+6823n-13633,{n,0,99}]
%t A218456 LinearRecurrence[{4,-6,4,-1},{-13633,-7121,-1223,4073},40] (* _Harvey P. Dale_, May 03 2018 *)
%o A218456 (Maxima) A218456(n):=2*n^3-313*n^2+6823*n-13633$
%o A218456 makelist(A218456(n),n,0,30); /* _Martin Ettl_, Nov 08 2012 */
%Y A218456 Cf. A124363, A076808.
%K A218456 sign,easy
%O A218456 0,1
%A A218456 _Pedja Terzic_, Oct 29 2012