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 A298105 #13 Feb 16 2025 08:33:53
%S A298105 15,96,30208,1562294353920,458842788759956138092569943104028672
%N A298105 Number of connected dominating sets in the n-Apollonian network.
%C A298105 Term a(6) has 107 decimal digits and a(7) has 320 decimal digits. - _Andrew Howroyd_, Jan 16 2018
%H A298105 Andrew Howroyd, <a href="/A298105/b298105.txt">Table of n, a(n) for n = 1..7</a>
%H A298105 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ApollonianNetworkh.html">Apollonian Network</a>
%H A298105 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ConnectedDominatingSet.html">Connected Dominating Set</a>
%t A298105 {1, 3, 3, 1} . # & /@ NestList[Function[{t0, t1, t2, t3}, {t1^3, t1 t2^2, t1^2 t2 + t2^2 t3, t2^3 + t3^3}] @@ # &, {1, 2, 2, 2}, 4] (* _Eric W. Weisstein_, Jan 17 2018 *)
%o A298105 (PARI) \\ here t0..t3 are for 0..3 outside vertices included in set.
%o A298105 D(t0,t1,t2,t3)={[t1^3, t1*t2^2, t1^2*t2 + t2^2*t3, t2^3 + t3^3]}
%o A298105 a(n)={my(v=[1,2,2,2]); for(i=2, n, v=D(v[1], v[2], v[3], v[4])); v[1]+3*v[2]+3*v[3]+v[4]}
%Y A298105 Cf. A291773, A298123.
%K A298105 nonn
%O A298105 1,1
%A A298105 _Eric W. Weisstein_, Jan 12 2018
%E A298105 Terms a(4) and beyond from _Andrew Howroyd_, Jan 16 2018