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 A217516 #21 Sep 08 2022 08:46:04
%S A217516 7,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,
%T A217516 5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,
%U A217516 9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9,8,5,4,9
%N A217516 Base-n state complexity of partitioned deterministic finite automaton (PDFA) for the periodic sequence (1234)*.
%H A217516 Klaus Sutner and Sam Tetruashvili, <a href="http://www.cs.cmu.edu/~sutner/papers/auto-seq.pdf">Inferring automatic sequences</a>.
%F A217516 Ultimately periodic with period length 4.
%F A217516 G.f.: x^2*(7 + 8*x + 5*x^2 + 4*x^3 + 2*x^4)/(1 - x^4). - _Vincenzo Librandi_, Nov 19 2012
%t A217516 Join[{7}, CoefficientList[Series[(8 + 5*x + 4*x^2 + 9x^3)/((1 - x^4)), {x, 0, 30}], x]] (* _Vincenzo Librandi_, Nov 18 2012 *)
%o A217516 (Magma) [7] cat &cat[[8, 5, 4, 9]: n in [0..30]]; // _Vincenzo Librandi_, Nov 18 2012
%K A217516 nonn
%O A217516 2,1
%A A217516 _N. J. A. Sloane_, Oct 07 2012
%E A217516 Terms corrected by _Vincenzo Librandi_, Nov 18 2012