Vectores aleatorios con distintas unidades
Defina una distribución conjunta de peso y estatura con una correlación supuesta de 0.65.
In[1]:=
![Click for copyable input](assets.es/random-vectors-with-different-units/In_22.png)
hw\[ScriptCapitalD] =
BinormalDistribution[{Quantity[1.8, "Meters"],
Quantity[85, "Kilograms"]}, {Quantity[0.15, "Meters"],
Quantity[9, "Kilograms"]}, 0.65]
Out[1]=
![](assets.es/random-vectors-with-different-units/O_20.png)
Calcule la probabilidad de la estatura de una persona que sea mayor a 1.75 metros, dado que el peso de la persona es mayor a 72 kilos.
In[2]:=
![Click for copyable input](assets.es/random-vectors-with-different-units/In_23.png)
NProbability[
h > Quantity[1.75, "m"] \[Conditioned]
w > Quantity[72, "kg"], {h, w} \[Distributed] hw\[ScriptCapitalD]]
Out[2]=
![](assets.es/random-vectors-with-different-units/O_21.png)
Calcule la distribución del índice de masa corporal(BMI) para dicha población.
In[3]:=
![Click for copyable input](assets.es/random-vectors-with-different-units/In_24.png)
bmi\[ScriptCapitalD] =
TransformedDistribution[
w/h^2, {h, w} \[Distributed] hw\[ScriptCapitalD]]
Out[3]=
![](assets.es/random-vectors-with-different-units/O_22.png)
Estime la distribución del BMI usando un histograma de muestra.
In[4]:=
![Click for copyable input](assets.es/random-vectors-with-different-units/In_25.png)
sample = RandomVariate[bmi\[ScriptCapitalD], 10^5];
Histogram[sample, Automatic, "PDF", AxesLabel -> Automatic]
Out[4]=
![](assets.es/random-vectors-with-different-units/O_23.png)