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 A303227 #25 Jun 10 2025 19:50:40
%S A303227 1,1,0,3,12,80,840,4032,31976,371016,4354650,55066880,680003412,
%T A303227 9047989392,132626606294,2096065474440,34991505975120,607163217989312,
%U A303227 11006996786618994,209218563659672064,4168806234781798100,86745911047924139760,1876774293382882814382
%N A303227 Number of minimal total dominating sets in the n-triangular (Johnson) graph.
%H A303227 Andrew Howroyd, <a href="/A303227/b303227.txt">Table of n, a(n) for n = 0..200</a>
%H A303227 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/JohnsonGraph.html">Johnson Graph</a>.
%H A303227 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MinimalTotalDominatingSet.html">Minimal Total Dominating Set</a>.
%H A303227 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TriangularGraph.html">Triangular Graph</a>.
%F A303227 E.g.f.: exp(x^3/2) + x*exp(x*exp(x^2+x) - (x+x^2+x^3+x^4/2)). - _Andrew Howroyd_, Apr 21 2018
%t A303227 Range[0, 20]! CoefficientList[Series[Exp[x^3/2] + x Exp[x Exp[x^2 + x] - (x + x^2 + x^3 + x^4/2)], {x, 0, 20}], x] (* _Eric W. Weisstein_, Apr 23 2018 *)
%o A303227 (PARI) seq(n)={Vec(serlaplace(exp(x^3/2 + O(x*x^n)) + x*exp(x*exp(x^2+x + O(x^n)) - (x+x^2+x^3+x^4/2))))} \\ _Andrew Howroyd_, Apr 21 2018
%Y A303227 Cf. A290716, A303048, A304561.
%K A303227 nonn
%O A303227 0,4
%A A303227 _Eric W. Weisstein_, Apr 20 2018
%E A303227 a(0)-a(1) prepended and a(8)-a(22) from _Andrew Howroyd_, Apr 21 2018