计算 R 中向量区间的中值

问题描述

我面临以下挑战: 设 X 为 V.A.离散均匀分布在区间 [1,10] 中。是Y 另一个 V.A. Y 的每个样本由一个的中值给出 一组 10 个 X 样本。生成 10^6 个 Y 样本。

我正在使用 R,代码如下:

x <- runif(10000000,1,10)
sample <- cut(x,breaks=10)
y = median(sample)

解决方法

你可以这样做:

 mosaic::median(~x|sample)

或在基数 R 中:

 tapply(x,sample,median)