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 A302941 #14 Feb 16 2025 08:33:53
%S A302941 9,121,1296,14161,154449,1684804,18378369,200477281,2186871696,
%T A302941 23855111401,260219353689,2838557779204,30963916217529,
%U A302941 337764520613641,3684445810532496,40191139395243841,438418087537149729,4782407823513403204,52168067971110285489
%N A302941 Number of total dominating sets in the 2n-crossed prism graph.
%H A302941 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/CrossedPrismGraph.html">Crossed Prism Graph</a>
%H A302941 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TotalDominatingSet.html">Total Dominating Set</a>
%H A302941 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (10,10,-1).
%F A302941 From _Andrew Howroyd_, Apr 16 2018: (Start)
%F A302941 G.f.: x*(9 + 31*x - 4*x^2)/((1 + x)*(1 - 11*x + x^2)).
%F A302941 a(n) = 10*a(n-1) + 10*a(n-2) - a(n-3) for n > 3.
%F A302941 a(n) = A006497(n)^2. (End)
%t A302941 Table[2 (-1)^n + ((11 - 3 Sqrt[13])/2)^n + ((11 + 3 Sqrt[13])/2)^n, {n, 20}] // FullSimplify
%t A302941 Table[LucasL[n, 3]^2, {n, 20}]
%t A302941 LucasL[Range[20], 3]^2
%t A302941 LinearRecurrence[{10, 10, -1}, {9, 121, 1296}, 20]
%t A302941 CoefficientList[Series[(9 + 31 x - 4 x^2)/(1 - 10 x - 10 x^2 + x^3), {x, 0, 20}], x]
%o A302941 (PARI) Vec((9 + 31*x - 4*x^2)/((1 + x)*(1 - 11*x + x^2)) + O(x^30)) \\ _Andrew Howroyd_, Apr 16 2018
%Y A302941 Cf. A006497, A287062, A291772, A302946.
%K A302941 nonn,easy
%O A302941 1,1
%A A302941 _Eric W. Weisstein_, Apr 16 2018
%E A302941 a(1) and terms a(6) and beyond from _Andrew Howroyd_, Apr 16 2018