块〔{$MaxExtraPrecision=10^3,s=Rest@@系数列表[级数[(1+3 x-平方[1-6 x+5 x ^2])/(2 x ^2+6 x),{x,0,21}],x]},嵌套[附加[#,5#[-1-]-4 s[[Length@#-1]]&,{1,1},Length@s]](*迈克尔·德弗利格2019年12月15日,之后_罗伯特G公司.威尔逊v(v)_在A117641号*)
Michael De Vlieger,<a href=“/A126952号/b126952.txt“>n表,n=0..1001时为a(n)</a>
Isaac DeJager、Madeleine Naquin、Frank Seidl,<a href=“https://www.valpo.edu/mathematics-statistics/files/2019/08/Drube2019.pdf“>高阶彩色莫茨金路径,VERUM 2019。
数学
块[{$MaxExtraPrecision=10^3,s=Rest@系数列表[序列[(1+3 x-平方[1-6 x+5 x ^2])/(2 x ^2+6 x),{x,0,21}],x]},嵌套[Append[#,5#[[-1]]-4 s[[Length@#-1]]&,{1,1},Length@s]](*迈克尔·德弗利格2019年12月15日*)