%I#33 2022年8月20日08:50:52
%S 1,0,4,4,12,20,44,84172340684136427325460109242184443692,
%电话873801747643495246990521398100279620455924041118481222369620,
%电话:4473924489478417895697235791394071582788414316557642863311532
%N(1-x+2*x^2)/((1+x)*(1-2*x))的展开。
%C部分总和为A097074。
%C两两和是{1,1,4,16,32,…}或2^n-和{k=0..n}二项式(n,k)*(-1)^(n+k)*k。
%H Vincenzo Librandi,n的表,n=0..1000的a(n)</a>
%H<a href=“/index/Rec#order_02”>带常数的线性重复出现的索引条目,签名(1,2)。
%F a(n)=(2*2^n+4*(-1)^n)/3-0^n。
%F a(n)=A001045(n+1)+(-1)^n-0^n。
%F a(n)=2*A078008(n)-0^n。
%F a(2*n+1)+a(2*n+2)=A000302(n+1)_Paul Curtz,2008年6月30日
%F G.F:1-x+x*Q(0),其中Q(k)=1+2*x^2+(4*k+5)*x-x*(4*k+1+2*x)/Q(k+1);(连分数)。-_谢尔盖·格拉德科夫斯基(Sergei N.Gladkovskii),2013年10月7日
%例如:(1/3)*(2*exp(2*x)+4*exp_G.C.Greubel,2022年8月19日
%t k=0;lst={1,k};做[k=2^n-k;附加到[lst,k],{n,2,5!}];第1页(*_Vladimir Joseph Stephan Orlovsky,2008年12月11日*)
%t系数列表[系列[(1-x+2x^2)/(1+x)(1-2x)),{x,0,40}],x](*哈维·P·戴尔,2012年12月10日*)
%o(岩浆)[2*2^n/3+4*(-1)^n/3-0^n:n in[0..35]];//_文森佐·利班迪(Vincenzo Librandi),2011年8月12日
%o(PARI)a(n)=([0,1;2,1]^n*[1;0])[1,1]\\查尔斯·格里特豪斯IV,2016年10月3日
%o(SageMath)
%o定义A097073(n):如果(n==0)其他2*(2^n+2*(-1)^n)/3,则返回1
%o[A097073(n)代表n in(0..40)]#_G.C.Greubel_,2022年8月19日
%Y参考A046055、A097074。
%Y参考A001045、A078008(形式a(n)=2^n-a(n-1))。
%K简单,无
%0、3
%A·鲍尔·巴里,2004年7月22日
%Orlovsky注释中的E模糊变量k被_R.J.Mathar_替换为a(n),2009年4月23日
|