Quelqu'un peut-il suggérer comment je peux calculer le deuxième moment (ou la fonction de génération de moment entier) du cosinus de deux vecteurs aléatoires gaussiens , chacun distribué comme , indépendants les uns des autres? IE, moment pour la variable aléatoire suivante
La question la plus proche est la fonction de génération de moment du produit interne de deux vecteurs aléatoires gaussiens qui dérive MGF pour le produit interne. Il y a aussi cette réponse de mathoverflow qui relie cette question à la distribution des valeurs propres des échantillons de matrices de covariance, mais je ne vois pas immédiatement comment les utiliser pour calculer le deuxième moment.
Je soupçonne que le deuxième moment est proportionnel à la demi-norme des valeurs propres de car j'obtiens ce résultat par une manipulation algébrique pour 2 dimensions, et aussi pour 3 dimensions à partir de deviner et vérifier. Pour les valeurs propres totalisant 1, le deuxième moment est:
Utilisation des éléments suivants pour la vérification numérique
val1[a_, b_, c_] := (a + b + c)/(Sqrt[a] + Sqrt[b] + Sqrt[c])^2
val2[a_, b_, c_] := Block[{},
x := {x1, x2, x3};
y := {y1, y2, y3};
normal := MultinormalDistribution[{0, 0, 0}, ( {
{a, 0, 0},
{0, b, 0},
{0, 0, c}
} )];
vars := {x \[Distributed] normal, y \[Distributed] normal};
NExpectation[(x.y/(Norm[x] Norm[y]))^2, vars]]
val1[1.5,2.5,3.5] - val2[1.5,2.5,3.5]
Vérification de la formule pour 4 variables (dans les limites numériques):
val1[a_, b_, c_,
d_] := (a + b + c + d)/(Sqrt[a] + Sqrt[b] + Sqrt[c] + Sqrt[d])^2
val2[a_, b_, c_, d_] := Block[{},
x := {x1, x2, x3, x4};
y := {y1, y2, y3, y4};
normal :=
MultinormalDistribution[{0, 0, 0,
0}, {{a, 0, 0, 0}, {0, b, 0, 0}, {0, 0, c, 0}, {0, 0, 0, d}}];
vars := {x \[Distributed] normal, y \[Distributed] normal};
NExpectation[(x.y/(Norm[x] Norm[y]))^2, vars]]
val1[0.5, 1.5, 2.5, 3.5] - val2[0.5, 1.5, 2.5, 3.5]