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 A171834 #25 Sep 08 2022 08:45:50
%S A171834 1,3,10,18,27,37,52,68,85,103,126,150,175,201,232,264,297,331,370,410,
%T A171834 451,493,540,588,637,687,742,798,855,913,976,1040,1105,1171,1242,1314,
%U A171834 1387,1461,1540,1620,1701,1783,1870,1958,2047,2137,2232,2328,2425,2523
%N A171834 Partial sums of numbers congruent to {0, 1, 2, 7} mod 8 (A047527).
%H A171834 G. C. Greubel, <a href="/A171834/b171834.txt">Table of n, a(n) for n = 1..10000</a>
%H A171834 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (2,-1,0,1,-2,1).
%F A171834 a(n) = Sum_{i=1..n} A047527(i).
%F A171834 From _G. C. Greubel_, Sep 04 2018: (Start)
%F A171834 a(n) = (4*n^2 + 2*n - 3 + 2*(1 + (-1)^n)*I^n - (-1)^n)/4, where I = sqrt(-1).
%F A171834 G.f.: x*(1+x+5*x^2+x^3)/((1-x)^2*(1-x^4)).
%F A171834 E.g.f.: (2*cos(x) +(2*x^2 +3*x -1)*sinh(x) +(2*x^2 +3*x -2)*cosh(x))/2. (End)
%t A171834 Accumulate[Select[Range[120],MemberQ[{0,1,2,7},Mod[#,8]]&]] (* _Harvey P. Dale_, Mar 08 2011 *)
%t A171834 Table[(4*n^2 +2*n -3 +2*(1 +(-1)^n)*I^n -(-1)^n)/4, {n, 1, 100}] (* _G. C. Greubel_, Sep 04 2018 *)
%o A171834 (PARI) vector(100, n, (4*n^2 +2*n -3 +2*(1 +(-1)^n)*I^n -(-1)^n)/4) \\ _G. C. Greubel_, Sep 04 2018
%o A171834 (PARI) x='x+O('x^99); Vec(x*(1+x+5*x^2+x^3)/((1-x)^2*(1-x^4))) \\ _Altug Alkan_, Sep 05 2018
%o A171834 (Magma) C<I> := ComplexField(); [Round((4*n^2 +2*n -3 +2*(1 +(-1)^n)*I^n -(-1)^n)/4): n in [1..100]]; // _G. C. Greubel_, Sep 04 2018
%Y A171834 Cf. A047527.
%K A171834 nonn
%O A171834 1,2
%A A171834 _Jaroslav Krizek_, Dec 19 2009