A131557 - OEIS

%I #42 Mar 22 2024 18:48:14

%S 55,2485,17020,799480,5479705,257429395,1764447310,82891465030,

%T 568146553435,26690794309585,182941425758080,8594352876220660,

%U 58906570947547645,2767354935348742255,18967732903684582930,891079694829418784770,6107551088415488155135

%N Triangular numbers that are the sums of five consecutive triangular numbers.

%H Alois P. Heinz, <a href="/A131557/b131557.txt">Table of n, a(n) for n = 1..250</a>

%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (1,322,-322,-1,1).

%F The subsequences with odd indices and even indices satisfy the same recurrence relations: a(n+2) = 322*a(n+1) - a(n) - 680 and a(n+1) = 161*a(n) - 340 + 9*sqrt(320*a(n)^2 - 1360*a(n) - 175).

%F G.f.: -5*x*(11+486*x-635*x^2+2*x^4) / ( (x-1)*(x^2+18*x+1)*(x^2-18*x+1) ).

%F 8*a(n) = 17 + 45*A007805(n) + 18*(-1)^n*A049629(n). - _R. J. Mathar_, Apr 28 2020

%e a(1) = 55 = 3+6+10+15+21.

%p a:= n-> `if`(n<2, [0, 55][n+1], (<<0|1|0>, <0|0|1>, <1|-323|323>>^iquo(n-2, 2, 'r'). `if`(r=0, <<2485, 799480, 257429395>>, <<17020, 5479705, 1764447310>>))[1, 1]): seq(a(n), n=1..20); # _Alois P. Heinz_, Sep 25 2008, revised Dec 15 2011

%t LinearRecurrence[{1, 322, -322, -1, 1}, {55, 2485, 17020, 799480, 5479705}, 20] (* _Jean-François Alcover_, Oct 05 2019 *)

%Y Cf. A129803.

%K nonn,easy

%O 1,1

%A _Richard Choulet_, Oct 06 2007

%E More terms from _Alois P. Heinz_, Sep 25 2008

%E a(6) and a(8) corrected by _Harvey P. Dale_, Oct 02 2011

%E a(10), a(12), a(14) corrected at the suggestion of _Harvey P. Dale_ by _D. S. McNeil_, Oct 02 2011