(PARI)α(k,n)=如果(k<下限(n/2),2,如果(n%2==1,2,1))
e(r,k,n)=楼层(n/r)-楼层(k/r)–楼层(n-k)/r)
phi2(n)=如果(n<3,返回值(1),返回值
对于(m=1,30,print1(polceoff(phi2(m),0)“,”)\\Herman Jamke(hermanjamke(AT)fastmail.fm),2010年8月20日
(PARI)pi0(n)=产品(k=1,n,k^楼层(n/k))
J(v,m)=总和(n=0,m,(-1)^n*(x/2)^(2*n+v)/(n!*(n+v!))+O(x^(2*m+v))
p=J(1101)/(2*J(0101));对于步骤(n=1200,2,打印((n+1)/2“”polceoff(p,n)*pi0((n+1/2)*2^(n+1”))\\Herman Jamke(hermanjamke(AT)fastmail.fm),2010年9月3日
|