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 A049779 #44 Jun 25 2025 01:07:26
%S A049779 2,5,13,23,41,62,94,130,180,235,307,385,483,588,716,852,1014,1185,
%T A049779 1385,1595,1837,2090,2378,2678,3016,3367,3759,4165,4615,5080,5592,
%U A049779 6120,6698,7293,7941,8607,9329,10070,10870,11690,12572,13475,14443,15433
%N A049779 a(n) = Sum_{k=1..floor(n/2)} T(n, 2k), array T as in A049777.
%C A049779 a(n) is coefficient of x^2 in -Product_{j=1..n} (1 + (-1)^j*j*x). - _Robert Israel_, Jun 08 2015
%H A049779 Vincenzo Librandi, <a href="/A049779/b049779.txt">Table of n, a(n) for n = 2..1000</a>
%H A049779 M. Benoumhani and M. Kolli, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL13/Benoumhani/benoumhani6.html">Finite topologies and partitions</a>, JIS 13 (2010) # 10.3.5, Lemma 6 2nd line.
%H A049779 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (2,1,-4,1,2,-1).
%F A049779 G.f.: x^2*(2+x+x^2)/((1-x)^4*(1+x)^2). Pairwise sums of A023856. - _Ralf Stephan_, May 06 2004
%F A049779 a(n) = Sum_{k=1..n} k*floor(k/2). - _Vladeta Jovovic_, Apr 29 2006
%F A049779 a(n) = (8*n^3 + 6*n^2 - 2*n - 3 + 3*(-1)^n *(2*n+1))/48. - _Robert Israel_, Jun 08 2015
%F A049779 a(n) = (n*(n+1)*(4*n-1) + 6*(-1)^n*floor((n+1)/2))/24. - _Néstor Jofré_, Apr 24 2017
%F A049779 E.g.f.: ( (8*x^3 + 30*x^2 + 12*x - 3)*exp(x) + 3*(1-2*x)*exp(-x) )/48. - _G. C. Greubel_, Dec 12 2019
%p A049779 seq( (8*n^3 +6*n^2 -2*n -3 +3*(-1)^n*(2*n+1))/48, n=2..50); # _G. C. Greubel_, Dec 12 2019
%t A049779 T[m_, n_]:=(m+n)(m-n+1)/2; Table[Sum[T[n, 2k], {k, Floor[n/2]}], {n, 2, 50}] (* _Indranil Ghosh_, Apr 24 2017 *)
%t A049779 LinearRecurrence[{2, 1, -4, 1, 2, -1}, {2, 5, 13, 23, 41, 62}, 50] (* _Vincenzo Librandi_, Apr 25 2017 *)
%o A049779 (PARI) a(n)=(4*n^3 + 3*n^2 + 2*n - if(n%2,6*n+3))/24 \\ _Charles R Greathouse IV_, Jun 08 2015
%o A049779 (MATLAB) a = @(n) 1/4*(n*(n+1)*(4*n-1)/6 + (-1)^n*floor((n+1)/2)); % _Néstor Jofré_, Apr 24 2017
%o A049779 (Magma) [n^3/6+n^2/8-n/24-1/16+(-1)^n*(n/8+1/16): n in [2..50]]; // _Vincenzo Librandi_, Apr 25 2017
%o A049779 (Sage) [(8*n^3 +6*n^2 -2*n -3 +3*(-1)^n*(2*n+1))/48 for n in (2..50)] # _G. C. Greubel_, Dec 12 2019
%o A049779 (GAP) List([2..50], n-> (8*n^3 +6*n^2 -2*n -3 +3*(-1)^n*(2*n+1))/48); # _G. C. Greubel_, Dec 12 2019
%K A049779 nonn,easy
%O A049779 2,1
%A A049779 _Clark Kimberling_
%E A049779 More terms from _Ralf Stephan_, May 06 2004