Jednym z podejść jest najpierw obliczenie funkcji generującej moment (mgf) dla Yn określony przez Yn=U21+⋯+U2n gdzie Ui,i=1,…,n jest niezależnymi i identycznie rozmieszczonymi standardowymi jednolitymi zmiennymi losowymi.
Kiedy to mamy, możemy to zobaczyć
EYn−−√
jest ułamkowym momentem Yn zamówienia α=1/2. Następnie możemy wykorzystać wyniki z pracy Noel Cressie i Marinus Borkent: „Funkcja generowania momentu ma swoje chwile”, Journal of Statistics Plan and Inference 13 (1986) 337-344, która daje momenty ułamkowe poprzez ułamkowe różnicowanie funkcji generowania momentu .
Najpierw funkcja generowania momentu U21, które piszemy M1(t).
M1(t)=EetU21=∫10etx2x−−√dx
i oceniłem to (z pomocą Maple i Wolphram Alpha), aby dać
M1(t)=erf(−t−−√)π−−√2−t−−√
gdzie i=−1−−−√jest urojoną jednostką. (Wolphram Alpha daje podobną odpowiedź, ale pod względem całki Dawsona. ) Okazuje się, że w większości potrzebujemyt<0. Teraz łatwo jest znaleźć mgfYn:
Mn(t)=M1(t)n
Następnie wyniki z cytowanego artykułu. Dlaμ>0 definiują μcałka rzędu funkcji f tak jak
Iμf(t)≡Γ(μ)−1∫t−∞(t−z)μ−1f(z)dz
Więc dla α>0 i nieintegralne, n dodatnia liczba całkowita oraz 0<λ<1 takie, że α=n−λ. Następnie pochodnaf zamówienia α jest zdefiniowany jako
Dαf(t)≡Γ(λ)−1∫t−∞(t−z)λ−1dnf(z)dzndz.
Następnie podają (i potwierdzają) następujący wynik dla dodatniej zmiennej losowej X: Załóżmy MX(mgf) jest zdefiniowane. Więc dlaα>0,
DαMX(0)=EXα<∞
Teraz możemy spróbować zastosować te wyniki do Yn. Zα=1/2 znaleźliśmy
EY1/2n=D1/2Mn(0)=Γ(1/2)−1∫0−∞|z|−1/2M′n(z)dz
gdzie liczba pierwsza oznacza pochodną. Klon daje następujące rozwiązanie:
∫0−∞n⋅(erf(−z−−−√)π−−√−2ez−z−−−√)en(−2ln2+2ln(erf(−z√))−ln(−z)+ln(π))22π(−z)3/2erf(−z−−−√)dz
Pokażę wykres tego oczekiwania, wykonany w klonie przy użyciu integracji numerycznej, wraz z przybliżonym rozwiązaniem A(n)=n/3−1/15−−−−−−−−−√z jakiegoś komentarza (i omówionego w odpowiedzi przez @Henry). Są niezwykle blisko:
Jako uzupełnienie wykres błędu procentowego:
Powyżej n=20przybliżenie jest bliskie dokładności. Poniżej użytego kodu klonu:
int( exp(t*x)/(2*sqrt(x)), x=0..1 ) assuming t>0;
int( exp(t*x)/(2*sqrt(x)), x=0..1 ) assuming t<0;
M := t -> erf(sqrt(-t))*sqrt(Pi)/(2*sqrt(-t))
Mn := (t,n) -> exp(n*log(M(t)))
A := n -> sqrt(n/3 - 1/15)
Ex := n -> int( diff(Mn(z,n),z)/(sqrt(abs(z))*GAMMA(1/2) ), z=-infinity..0 ,numeric=true)
plot([Ex(n),A(n)],n=1..100,color=[blue,red],legend=[exact,approx],labels=[n,expectation],title="expectation of sum of squared uniforms")
plot([((A(n)-Ex(n))/Ex(n))*100],n=1..100,color=[blue],labels=[n,"% error"],title="Percentage error of approximation")