%I#24 2022年9月8日08:45:27
%S 5,13,41,4153436,89571208957412332131100093346190481610,
%电话:795347956195025620166166358515972968122977111366894250681,
%电话:130973773498831141811107711100899662510929134601103115431310957991828931049
%N三角形T(N,k)=(k*ChebyshevU(N,(k+2)/2)+2*ChebyschevT(N+1,(k=2)/2))/2。
%H G.C.Greubel,<a href=“/A121872/b121872.txt”>行n=1..100的三角形,扁平</a>
%F T(n,m)=((m+F(m))*(m+2-F(m)。
%F From _G.C.Greubel_,2019年10月8日:(开始)
%F T(n,k)=(k*ChebyshevU(n,(k+2)/2)+2*ChebyschevT(n+1,(k=2)/2;
%F T(n,k)=(k*Fibonacci(n+2,m+2,-1)+Lucas(n+2,m+2,-1))/2,其中Fibonaci(n,x,y)和Lucas。(结束)
%e三角形开头为:
%e 5;
%e 13、41;
%e 34、153、436;
%e 89、571、2089、5741;
%e 233、2131、10009、33461、90481;
%p seq(seq(简化((k*ChebyshevU(n,(k+2)/2)+2*ChebyschevT(n+1,(k=2)/2,)/2),k=1..n),n=1..10);#_G.C.Greubel,2019年10月9日
%t f[k_]:=平方[k*(k+4)];T[n_,m_]:=T[n,m]=完全简化[((m+f[m])*;表[T[n,m],{n,10},{m,n}]//扁平(*由_G.C.Greubel_修改,2019年10月8日*)
%tT[n_,k_]:=t[n,k]=(k*ChebyshevU[n,(k+2)/2]+2*ChebyshavT[n+1,(k=2)/2])/2;表[T[n,k],{n,10},{k,n}]/扁平(*_G.C.格鲁贝尔,2019年10月8日*)
%o(PARI)T(n,k)=(k*sin((n+1)*acos((k+2)/2))/sin;
%o表示(n=1,10,表示(k=1,n,print1(圆形(T(n,k)),“,”))\\_G.C.Greubel_,2019年10月8日
%o(岩浆)
%o T:=func<n,k|(k*Sinh((n+1)*Argcosh((k+2)/2))/Sinh(Argcosh+2*Cosh((n+2)/2>);
%o[圆(T(n,k)):[1..n]中的k,[1..10]]中的n;//_G.C.Greubel_,2019年10月8日
%o(鼠尾草)
%o[[(k*chebyshev_U(n,(k+2)/2)+2*chebysev_T(n+1,(k=2)/2
%Y参考A094954,A162997。
%Y参考A053117、A053120。
%K nonn,简单,tabl
%O 1,1号机组
%A _Roger L.Bagula_和_Gary W.Adamson_,2006年9月9日
%E主要编辑和新名称,_G.C.Greubel_,2019年10月8日