如何用r语言对中位数进行区间估计

如何用r语言对样本中位数进行区间估计,非参数统计的,课本上的代码运行结果不对

img