OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
P. Lafer, Discovering the square-triangular numbers, Fib. Quart., 9 (1971), 93-105.
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).
FORMULA
G.f.: x*(7-6*x)/(1-x)^3.
a(n) = A126890(n,6) for n > 5. - Reinhard Zumkeller, Dec 30 2006
a(n) = A000096(n) + 5*A001477(n) = A056115(n) + A001477(n) = A056121(n) - A001477(n). - Zerinvary Lajos, Feb 22 2008
If we define 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,7), for n >= 1. - Milan Janjic, Dec 20 2008
a(n) = n + a(n-1) + 6 (with a(0)=0). - Vincenzo Librandi, Aug 07 2010
Sum_{n>=1} 1/a(n) = 1145993/2342340 via A132759. - R. J. Mathar, Jul 14 2012
a(n) = 7*n - floor(n/2) + floor(n/2). - Wesley Ivan Hurt, Jun 15 2013
E.g.f.: x*(14 + x)*exp(x)/2. - G. C. Greubel, Jan 18 2020
Sum_{n>=1} (-1)^(n+1)/a(n) = 4*log(2)/13 - 263111/2342340. - Amiram Eldar, Jan 10 2021
MATHEMATICA
Table[n*(n+13)/2, {n, 0, 50}] (* Paolo Xausa, Jun 26 2024 *)
PROG
(PARI) a(n)=n*(n+13)/2 \\ Charles R Greathouse IV, Oct 07 2015
(Magma) [n*(n+13)/2: n in [0..50]]; // G. C. Greubel, Jan 18 2020
(Sage) [n*(n+13)/2 for n in (0..50)] # G. C. Greubel, Jan 18 2020
(GAP) List([0..50], n-> n*(n+13)/2 ); # G. C. Greubel, Jan 18 2020
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Barry E. Williams, Jul 04 2000
EXTENSIONS
More terms from James A. Sellers, Jul 05 2000
STATUS
approved