%I#28 2023年10月27日19:24:03
%S 1,1,1,1,1,1,1,1,2,3,4,5,6,7,8,9,11,14,18,23,29,36,44,53,64,78,96120,
%电话:15018723228635143052764980299312301522188023182854,
%电话:351443305341659481451006112423153301890823316287533546743762562540106668281101540125286154566190682
%N构成立方体总和的成分数量。
%H Alois P.Heinz,n表,n=0..1000时的a(n)
%F G.F.:1/(1-和{n>=1}x ^(n^3))_Joerg Arndt_,2014年3月30日
%F a(n)~c*d^n,其中d=1.2338881403372741887535479…,c=0.418031200641837887398653…-Vaclav Kotesovec_,2014年5月1日
%p a:=proc(n)选项记忆`如果`(n=0,1,
%p`if`(n<0,0,加(a(n-i^3),i=1..iroot(n,3)))
%p端:
%p序列(a(n),n=0..80);#_Alois P.Heinz,2014年9月8日
%t a[n_]:=a[n]=如果[n==0,1,如果[n<0,0,和[a[n-i^3],{i,1,底面[n^(1/3)]}]];表[a[n],{n,0,80}](*_Jean-François Alcover_,2015年4月8日,在_Alois P.Heinz_*之后)
%o(PARI)E=6;N=E^3-1;q='q+O('q^N);
%o gf=1/(1-总和(n=1,E,q^(n^3)));\\测试,几个类似的序列。
%o v=Vec(gf)\\ Joerg Arndt_,2014年3月30日
%K nonn公司
%0、9
%大卫·W·威尔逊_
|