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 A086143 #7 Apr 14 2016 10:44:45
%S A086143 4,585,1111,99499,1010101,1001001001,1000100010001,1000010000100001,
%T A086143 1000001000001000001,1000000100000010000001,1000000010000000100000001,
%U A086143 1000000001000000001000000001,1000000000100000000010000000001
%N A086143 Palindromes of the form n^3 + n^2 + n + 1.
%C A086143 Values of n are 1, 8, 10, 46, 100, 1000, etc.
%H A086143 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (1111,-112110,1111000,-1000000).
%t A086143 f[n_] := (n^3 + n^2 + n + 1); a = Select[ Range[10^7], FromDigits[ Reverse[ IntegerDigits[ f[ # ]]]] == f[ # ] & ]; a^3 + a^2 + a + 1
%t A086143 Select[Table[n^3+n^2+n+1,{n,10^7}],#==IntegerReverse[#]&] (* The program uses the IntegerReverse function from Mathematica version 10 *) (* _Harvey P. Dale_, Apr 14 2016 *)
%Y A086143 Sequence A028414 deals with n^2 + n + 1.
%K A086143 base,nonn
%O A086143 1,1
%A A086143 Karl Goiser (kggoiser(AT)utas.edu.au), Aug 24 2003
%E A086143 More terms from _Robert G. Wilson v_, Sep 01 2003
%E A086143 More terms fdrom _Harvey P. Dale_, Apr 14 2016