决策树模型将自变量空间划分成若干个区域，对于每一个区域的预测值为该区域内样本点的均值。但是我想让每个每个区域的预测值为该区域内样本点的中位数，请问这种方法在R里有没有相关代码？