%I#40 2022年9月8日08:44:56
%S 0,1,2,4,6,7,8,10,12,13,14,16,18,19,20,22,24,25,26,28,30,31,32,34,36,
%电话:37、38、40、42、43、44、46、48、49、50、52、54、55、56、58、60、61、62、64、66、67、68、70,
%U 72,73,74,76,78,79,80,82,84,85,86,88,90,91,92,94,96,97单位
%与{0,1,2,4}模6同余的N个数。
%C序列是A047238(n)与A016777(n-1)的交织。-_Guenther Schrack,2019年2月11日
%H Guenther Schrack,n表,n=1..10002时的a(n)</a>
%H<a href=“/index/Rec#order_04”>具有常系数的线性递归索引条目,签名(2,-2,2,-1)。
%F开始(1,2,4,6,…)=(1,1,2_Gary W.Adamson_,2008年6月19日
%传真:x^2*(1+2*x^2)/(1+x^2,*(1-x)^2)_R.J.Mathar,2011年10月8日
%F From _Wesley Ivan Hurt_,2016年5月21日:(开始)
%当n>4时,F a(n)=2*a(n-1)-2*a(n-2)+2*a(n-3)-a(n-4)。
%F a(n)=(6*n-8+i^(1-n)-i^(1+n))/4,其中i=sqrt(-1)。
%Fα(2*n)=A016777(n-1),a(2*n-1)=A047238(n)。(结束)
%F来自Guenther Schrack,2019年2月11日:(开始)
%F a(n)=(6*n-8+(1-(-1)^n)*(-1)^(n*(n-1)/2))/4。
%当n>4时,F a(n)=a(n-4)+6,a(1)=0,a(2)=1,a(3)=2,a(4)=4。
%F a(-n)=-A047262(n+2)。
%当n>1时,F a(n)=A118286(n-1)/2。
%F a(n)=A047255(n)-1。(结束)
%F求和{n>=2}(-1)^n/a(n)=sqrt(3)*Pi/36+log(2)/3+log(3)/4.-_Amiram Eldar,2021年12月16日
%p A047237:=n->(6*n-8+I^(1-n)-I^(1+n))/4:seq(A047237(n),n=1..100);#_韦斯利·伊万·赫特,2016年5月21日
%t表[(6n-8+I^(1-n)-I^(1+n))/4,{n,80}](*韦斯利·伊万·赫特,2016年5月21日*)
%t线性递归[{2,-2,2,-1},{0,1,2,4},120](*哈维·P·戴尔,2018年1月21日*)
%o(岩浆)[0..110]|n mod 6 in[0,1,2,4]];//_G.C.Greubel,2019年2月16日
%o(PARI)我的(x='x+o('x^70));concat([0],Vec(x^2*(1+2*x^2)/(1+x^2,*(1-x)^2)))\\_G.C.Greubel_,2019年2月16日
%o(Sage)a=(x^2*(1+2*x^2)/((1+x^2,*(1-x)^2)).系列(x,72).系数(x,稀疏=假);a[1:]#_G.C.格鲁贝尔,2019年2月16日
%o(GAP)已过滤([0..100],n->n mod 6=0或n mod 6=1或n mod6=2或n mod 6=4);#_Muniru A Asiru_,2019年2月19日
%Y参见A016777、A047238、A047255、A047262、A118286。
%Y补码:A047270。
%K nonn,简单
%氧1,3
%A _N.J.A.斯隆_
%E来自韦斯利·伊万·赫特的更多条款,2016年5月21日
|