%I #23 Mar 15 2023 15:10:26
%S 1,1,97,577,1921,4801,10081,18817,32257,51841,79201,116161,164737,
%T 227137,305761,403201,522241,665857,837217,1039681,1276801,1552321,
%U 1870177,2234497,2649601,3120001,3650401,4245697,4910977,5651521
%N a(n) = ChebyshevT(4, n).
%H Vincenzo Librandi, <a href="/A144130/b144130.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (5,-10,10,-5,1).
%F From _Paul Barry_, Nov 17 2009: (Start)
%F G.f.: (1-4x+102x^2+92x^3+x^4)/(1-x)^5;
%F a(n) = 8*n^4-8*n^2+1. (End)
%F a(n) = 5*a(n-1) - 10*a(n-2) + 10*a(n-3) - 5*a(n-4) + a(n-5). - _Wesley Ivan Hurt_, Mar 15 2023
%p A144130:=n->8*n^4-8*n^2+1: seq(A144130(n), n=0..60); # _Wesley Ivan Hurt_, Apr 10 2017
%t Table[ChebyshevT[4, n], {n, 0, 50}] (* _Vincenzo Librandi_, May 30 2014 *)
%o (Magma) [8*n^4-8*n^2+1: n in [0..30]]; // _Vincenzo Librandi_, May 30 2014
%Y Cf. A144129.
%K nonn,easy
%O 0,3
%A _Vladimir Joseph Stephan Orlovsky_, Sep 11 2008
%E Changed offset from 1 to 0 by _Vincenzo Librandi_, May 30 2014
|