%I#22 2022年11月23日19:41:34
%S 0,1,2,3,6,17,34,991985771154336367261960139202114243228486,
%电话:665857133171438808997761798226195374523907413183632263672646,
%电话:76839840115367968024478554083895710816626102926097522058521941521390024993042780049886731088897
%N这样的数字,地板(a(N)^2/8)又是一个正方形。
%C或:其平方(最后一个以8为基数的数字被去掉)再次是平方的数字。(可能除了以8为基数的平方只有1位的3个初始项。)
%C关于截断a(n)^2所得的平方,见A204504;关于其平方根,见A20.4512_M.F.Hasler,2014年9月28日
%H M.F.Hasler,截断方块,OEIS wiki,2012年1月16日
%H<a href=“/index/Sq#sqtrunc”>索引与截断平方位相关的序列。
%H<a href=“/index/Rec#order_04”>具有常系数的线性重复出现的索引条目,签名(0,6,0,-1)。
%F G.F=(x^2+2*x^3-3*x^4-6*x^5)/(1-6*x*2+x^4)。
%F a(n)=平方(A055872(n))_M.F.Hasler,2014年9月28日
%F a(2n)=A001541(n-1)。a(2n+1)=A003499(n-1)_R.J.Mathar,2020年2月5日
%p A204514:=程序(n)coeftayl((x^2+2*x^3-3*x^4-6*x^5)/(1-6*x*2+x^4),x=0,n);结束过程:seq(A204514(n),n=1..30);#_韦斯利·伊万·赫特,2014年9月28日
%t系数列表[系列[(x^2+2*x^3-3*x^4-6*x^5)/(x(1-6*x*2+x^4)),{x,0,30}],x](*_Wesley Ivan Hurt_,2014年9月28日*)
%t线性递归[{0,6,0,-1},{0,1,2,3,6},40](*哈维·P·戴尔,2022年11月23日*)
%o(PARI)b=8;对于(n=0,1e7,issquare(n^2\b)&print1(n“,”)
%o(PARI)A204514(n)=波尔科夫((x+2*x^2-3*x^3-6*x^4)/(1-6*x*2+x^4+o(x^(n+!n)),n-1,x)
%Y参考A031149=sqrt(A023110)(以10为基数),A204502=sqert(A204503)(以9为基数)、A204516=sqrt(A055859)(以7为基数)和A204518=sqort(A0558501)(以6为基数);A204520=squart(A055812)。
%Y参见A003499、A055872、A204504、A204512。
%K nonn,简单
%氧1,3
%A _M.F.Hasler,2012年1月15日
|