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 A292228 #18 Apr 23 2018 09:33:53
%S A292228 1,5,65,325,13325,812825,13818025,1561436825,45281667925,
%T A292228 8195981894425,482116582025,434387040404525,135963143646616325,
%U A292228 9925309486202991725,4178555293691459516225,154606545866584002100325,16852113499457656228935425,10330345575167543268337415525,1415257343797953427762225926925,1077010838630242558527053930389925
%N A292228 Denominators of partial sums of the series 1 + 2*Sum_{k >= 1} 1/(4*k^4 + 1).
%C A292228 The corresponding numerators are given in A292227.
%C A292228 For the value of the series see A292227, and the Koecher reference given there.
%H A292228 Robert Israel, <a href="/A292228/b292228.txt">Table of n, a(n) for n = 0..340</a>
%F A292228 a(n) = denominator(s(n)) with the rationals (in lowest terms) s(n) = 1 + 2*Sum_{k=1..n} 1/(4*k^4 + 1), n >= 0.
%e A292228 See A292227.
%p A292228 seq(denom(t),t=ListTools:-PartialSums([1, seq(2/(4*k^4+1),k=1..30)])); # _Robert Israel_, Oct 30 2017
%t A292228 {1}~Join~Denominator[1 + 2 Accumulate[Array[1/(4 #^4 + 1) &, 19]]] (* _Michael De Vlieger_, Oct 30 2017 *)
%o A292228 (PARI) a(n) = denominator(1+2*sum(k=1, n, 1/(4*k^4 + 1))); \\ _Michel Marcus_, Oct 30 2017
%Y A292228 Cf. A292227.
%K A292228 nonn,frac,easy
%O A292228 0,2
%A A292228 _Wolfdieter Lang_, Oct 30 2017