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 A103517 #45 Feb 16 2025 08:32:56
%S A103517 1,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40,42,44,46,48,
%T A103517 50,52,54,56,58,60,62,64,66,68,70,72,74,76,78,80,82,84,86,88,90,92,94,
%U A103517 96,98,100,102,104,106,108,110,112,114,116,118,120,122,124,126
%N A103517 Expansion of (1+2*x-x^2)/(1-x)^2.
%C A103517 Row sums of A103516.
%C A103517 Also the number of maximal and maximum cliques in the (n+1) X (n+1) rook graph. - _Eric W. Weisstein_, Sep 14 2017
%C A103517 Also the number of maximal and maximum independent vertex sets in the (n+1) X (n+1) rook complement graph. - _Eric W. Weisstein_, Sep 14 2017
%H A103517 G. C. Greubel, <a href="/A103517/b103517.txt">Table of n, a(n) for n = 0..1000</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MaximalClique.html">Maximal Clique</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MaximumClique.html">Maximum Clique</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MaximalIndependentVertexSet.html">Maximal Independent Vertex Set</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MaximumIndependentVertexSet.html">Maximum Independent Vertex Set</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/RookComplementGraph.html">Rook Complement Graph</a>
%H A103517 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/RookGraph.html">Rook Graph</a>
%H A103517 <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (2,-1).
%F A103517 a(n) = 2*n + 2 - 0^n.
%F A103517 a(n) = Sum_{k=0..n} 0^(k(n-k))*(n+1).
%F A103517 Equals binomial transform of [1, 3, -1, 1, -1, 1, ...]. - _Gary W. Adamson_, Apr 23 2008
%F A103517 a(n) = 2*a(n-1) - a(n-2) for n > 2. - _Eric W. Weisstein_, Sep 14 2017
%F A103517 G.f.: (1 + 2*x - x^2)/(-1 + x)^2. - _Eric W. Weisstein_, Sep 14 2017
%p A103517 a := n -> 2*(n + 1) - 0^n: seq(a(n), n = 0..62); # _Peter Luschny_, May 12 2023
%t A103517 CoefficientList[Series[(-z^2 + 2*z + 1)/(z - 1)^2, {z, 0, 100}], z] (* _Vladimir Joseph Stephan Orlovsky_, Jul 10 2011 *)
%t A103517 CoefficientList[Series[2/(x - 1)^2 - 1, {x, 0, 62}], x] (* _Robert G. Wilson v_, Jan 29 2015 *)
%t A103517 Join[{1}, 2 Range[2, 20]] (* _Eric W. Weisstein_, Sep 14 2017 *)
%t A103517 Join[{1}, LinearRecurrence[{2, -1}, {4, 6}, 20]] (* _Eric W. Weisstein_, Sep 14 2017 *)
%o A103517 (Magma) [1] cat [2*n+2 : n in [1..60]]; // _Wesley Ivan Hurt_, Dec 07 2016
%Y A103517 Cf. A103516.
%Y A103517 Essentially the same as A004277, A005843, A051755, and A076032. - _R. J. Mathar_, Jul 31 2010
%Y A103517 Cf. A272651 (for which this sequence is a conjectured continuation for large n).
%K A103517 easy,nonn
%O A103517 0,2
%A A103517 _Paul Barry_, Feb 09 2005