%I #43 Sep 08 2022 08:45:31
%S 0,13,27,42,58,75,93,112,132,153,175,198,222,247,273,300,328,357,387,
%T 418,450,483,517,552,588,625,663,702,742,783,825,868,912,957,1003,
%U 1050,1098,1147,1197,1248,1300,1353,1407,1462,1518,1575
%N a(n) = n*(n + 25)/2.
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1).
%F Let f(n,i,a) = Sum_{k=0..n-i} (binomial(n,k)*Stirling1(n-k,i)*Product_{j=0..k-1} (-a-j)), then a(n) = -f(n, n-1, 13), for n>=1. - _Milan Janjic_, Dec 20 2008
%F a(n) = n + a(n-1) + 12 (with a(0)=0). - _Vincenzo Librandi_, Aug 03 2010
%F a(n) = 13*n - floor(n/2) + floor(n^2/2). - _Wesley Ivan Hurt_, Jun 15 2013
%F a(0)=0, a(1)=13, a(2)=27; for n>2, a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3). - _Harvey P. Dale_, Aug 09 2014
%F From _Amiram Eldar_, Jan 10 2021: (Start)
%F Sum_{n>=1} 1/a(n) = 2*A001008(25)/(25*A002805(25)) = 34052522467/111546435000.
%F Sum_{n>=1} (-1)^(n+1)/a(n) = 4*log(2)/25 - 19081066231/334639305000. (End)
%t Table[(n(n+25))/2,{n,0,50}] (* or *) LinearRecurrence[{3,-3,1},{0,13,27},50] (* _Harvey P. Dale_, Aug 09 2014 *)
%o (Magma) [n*(n + 25)/2 : n in [0..50]]; // _Wesley Ivan Hurt_, Jan 23 2017
%o (PARI) a(n)=n*(n+25)/2 \\ _Charles R Greathouse IV_, Jun 17 2017
%Y Cf. A000217, A001008, A002805, A056126.
%K nonn,easy
%O 0,2
%A _Omar E. Pol_, Aug 28 2007