Observe the following code: p = 0.5; n = 10^2; XbarObservationSet = Mean[RandomVariate[GeometricDistribution[p], {n, n}]] myplot1 = ????? myplot2 = Plot[PDF[NormalDistribution[0, 1], x], {x, -3, 3}] Show[myplot1, myplot2] Suppose my goal is to take all of the data collected in XbarObservationSet and display an approximated, continuous probability density function corresponding to the observed data andRead more