%I#19 2022年5月2日01:39:15

%S 0,1,2,6,6481213186060834774439752390528，

%电话：2418523320185277177863741363978240，

%电话：11698510100560033501377640350194228137500049288930688305497138757632

%N a（N）=2*a（N-1）^2-2*a（N-2）^2，a（0）=0，a（1）=1。

%H Harry J.Smith，n的表，a（n）表示n=0..12</a>

%F a（n）=A062000（n）/2。

%t加入[{a=0，b=1}，表[c=2*b^2-2*a^2；a=b；b=c，{n，10}]]（*_Vladimir Joseph Stephan Orlovsky_，2011年1月22日*）

%tnxt[{a，b}]：={b，2b^2-2a^2}；NestList[nxt，{0,1}，10][[All，1]]（*哈维·P·戴尔，2022年4月5日*）

%o（PARI）{表示（n=0，12，如果（n>1，a=2*a1^2-2*a2^2；a2=a1；a1=a，如果（n==0，a=a2=0，a=a1=1））；写（“b061999.txt”，n，“”，a））}\\哈里·史密斯，2009年7月29日

%o（SageMath）

%o定义a（n）：#a=A061999

%o如果（n<2）：返回n

%o else：返回2*（a（n-1）^2-a（n-2）^2）

%o[a（n）for n in（0..14）]#_G.C.Greubel_，2022年5月1日

%Y参考A062000。

%K nonn公司

%0、3

%A _Henry Bottomley_，2001年5月29日