R软件-分位数回归案例

分位数回归模型在R环境下的实现中国人民大学统计学院左辰潘岚锋大纲引言分位回归模型的基本结构回归系数的渐进分布参数估计残差形态的检验一个实例一、引言传统回归模型的缺陷：1只反映均值变化2Gauss-Markov假设条件太强分位回归模型1拟合在不同分位数水平下的估计值，可以反映更多的信息2对残差分布放松假设Rpackage：quantregbyRogerKoenker二、模型的构造其中：因变量相互独立自变量残差项回归系数表示分位数水平的回归系数()12,,...,nYYY12,,...,pnxxxR12,,...,n(|)'()iYiiQxxrq(y~x,tau=…,method=‘br’)以quantreg包中的engel为例：自变量：income--年收入因变量：foodexp--食品消费额fit1=rq(foodexp~income,data=engel)#tau值缺省为0.5，表示中位数回归fit2=rq(foodexp~income,data=engel,tau=c(0.1,0.25,0.75,0.9))#对0.1，0.25，0.75，0.9四个分位数水平进行回归10002000300040005000500100015002000regressionofengelincomefoodexpmedianregressionmeanregressionquantilesof0.1,0.25,0.75,0.9中位数回归和均值回归的差异均值回归受到离群点影响稳健性的试验目的：比较均值回归、中位数回归系数的稳定性方法：1计算原模型的预测值、残差2从残差中抽样加入到预测值中，重新作均值回归和中位数回归3统计两种回归系数的分布结果三、回归系数的渐进分布考虑独立同分布的场合模型：残差分布：双尾指数（Laplace）随机生成1000次，统计在0.1,0.2,…,0.9水平上的分位回归系数:rq(y~x,tau=seq(0.1,0.9,length=9))iiiyx1()exp(||)2fxx此外，可以观察回归系数的误差在不同分位数水平上的变化四、参数估计给出一个分位回归模型fit=rq(y~x)后，命令summary(fit,se=‘…’)可以查看参数估计的结果se选项用于选择参数估计的不同方法，主要有1se=‘ker’:核函数估计法2se=‘boot’:Bootstrap方法3se=‘rank’:秩检验1核函数估计法因为残差分布未知，无法直接求出Powell给出如下估计方法：(())iif11ˆ(||)'2niniiinHIucxxcn()nH2秩检验秩检验是R中进行参数估计的默认方法。该方法绕开了对未知变量的非参数估计，Jurekova,Guttenbrunner（1992）通过对偶规划问题的解，构造出一组秩统计量，渐进服从T分布summary(fit,se=‘nid’)结果：Call:rq(formula=foodexp~income)tau:[1]0.5Coefficients:ValueStd.ErrortvaluePr(|t|)(Intercept)81.4822519.250664.232700.00003income0.560180.0282819.810320.00000秩检验（续）Koenker,Machado(1994)推广了秩检验的思路，构造出非渐进分布意义下的参数估计方法summary(fit)结果：Call:rq(formula=foodexp~income)tau:[1]0.5Coefficients:coefficientslowerbdupperbd(Intercept)81.4822553.25915114.01156income0.560180.487020.6019注意：置信区间不是关于估计值对称的3Bootstrap通过放回抽样的Monte-Carlo试验，得到回归系数的均值和标准差运用T统计量的方法，构造置信区间summary(fit,se=‘boot’,bsmethod=‘xy’)结果：Call:rq(formula=foodexp~income)tau:[1]0.5Coefficients:ValueStd.ErrortvaluePr(|t|)(Intercept)81.4822526.624213.060460.00247income0.560180.0339916.482630.00000五、残差形态的检验分位数回归模型的一个重要应用就是对两种残差分布的如下两种形态作检验：1位置漂移模型（locationshiftmodel）2位置-尺度漂移模型（location-scaleshiftmodel）'iiiyxu''iiiiyxxu检验的思路：观察随的变化情况位置漂移模型：除常数项分量之外，与分位数水平无关反映在图上，不同分位数水平上的回归直线相互平行(1)()n()n()()(2,3,...,)inip2468100246810locationshiftmodelxy对分位数回归过程（regressionquantileprocess）作图分位数回归过程：对一簇分位数水平作回归得到的一组模型例子rqpr=rq(y~x,tau=1:99/100)plot(summary(rqpr))0.00.20.40.60.81.0-1.0-0.50.00.51.0(Intercept)0.00.20.40.60.81.00.970.991.011.03x位置-尺度漂移模型由表达式可以看出，向量的各分量随变化的规律是一致的模拟实例：x1-seq(1,10,length=1000)x2=rnorm(1000,mean=0,sd=10)x3=rexp(1000,rate=0.1)u=runif(1000,min=-2,max=2)y=x1+2*x2-x3+u*(-2*x1+x2-x3)rqpr=rq(y~x1+x2+x3,tau=10:90/100)plot(summary(rqpr))''iiiiyxxu()()n()n0.20.40.60.8-50510(Intercept)0.20.40.60.8-2-101234x10.20.40.60.81.01.52.02.53.03.5x20.20.40.60.8-2.5-1.5-0.50.5x3回归系数的变化情况基本一致,是位置-尺度漂移模型的典型特征检验方法Khmaladze检验Koenker&肖志杰（2002）引入Khmaladze鞅变换技术，计算统计量R：KhmaladzeTest(y~x1+x2+x3…,nullH=‘location’/‘location-scale’)#nullH:零假设（nullhypothesis），默认为‘location’,表示位置漂移模型六、一个例子：barro该数据记录了世界各国GDP的增长率和相关因子，共有161个观测；其中前71个观测在1965年~1975年取得；后90个观测是1985~1987年间取得。因子包括：y.net:GDP年增长率lgdp2:人均GDPmse2:男性高中教育情况fse2:女性高中教育情况fhe2:女性高等教育情况mhe2:男性高等教育情况lexp2:人均期望寿命lintr2:人均资本占有gedy2:教育投入占GDP的比重Iy2:投资占GDP的比例gcony2:公共设施建设占GDP的比例lblakp2:黑市借贷佣金率pol2:政治稳定性指数ttrad2贸易增长率。1、中位数回归library(quantreg)data(barro)attach(barro[62:161,])rqm=rq(y.net~lgdp2+mse2+fse2+fhe2+mhe2+lexp2+lintr2+gedy2+Iy2+gcony2+lblakp2+pol2+ttrad2)summary(rqm,se='nid')2分位数回归过程rqa=rq(y.net~lgdp2+mse2+fse2+fhe2+mhe2+lexp2+lintr2+gedy2+Iy2+gcony2+lblakp2+pol2+ttrad2,tau=10:90/100)rqas=summary(rqa)plot(rqas)0.20.6-0.40.00.3(Intercept)0.20.6-0.04-0.01lgdp20.20.6-0.020.02mse20.20.6-0.030.00fse20.20.6-0.20.0fhe20.20.6-0.100.10mhe20.20.60.000.10lexp20.20.6-0.0060.002lintr20.20.6-0.8-0.20.4gedy20.20.6-0.050.10Iy20.20.6-0.4-0.1gcony20.20.6-0.100.00lblakp20.20.6-0.05-0.01pol20.20.6-0.10.10.3ttrad2红色区域：最小二乘回归的参数图中看出各参数显著性3剔除自变量的影响rrs.test(lgdp2+lexp2+lblakp2+mse2+fse2,pol2+fhe2+mhe2+lintr2+gedy2+Iy2+gcony2+ttrad2,y.net)结果：$sn[,1][1,]4.66242$ranks[1]0.3355367390.3265540080.2952627520.3038393480.398400879……待检验的自变量个数为8个查表知，，可见剔除这些自变量对模型无显著影响20.1(8)2.8334.662对剩余自变量作分位数回归过程rqa=rq(y.net~lgdp2+lexp2+lblakp2+mse2+fse2,tau=10:90/100)rqas=summary(rqa)plot(rqas)0.20.40.60.8-0.4-0.20.0(Intercept)0.20.40.60.8-0.03-0.01lgdp20.20.40.60.80.000.050.100.15lexp20.20.40.60.8-0.100.000.05lblakp20.20.40.60.80.000.020.04mse20.20.40.60.8-0.05-0.03-0.01fse24残差分布形态的检验位置漂移模型：KhmaladzeTest(y.net~lgdp2+lexp2+lblakp2+mse2+fse2)位置-尺度漂移模型：KhmaladzeTest(y.net~lgdp2+lexp2+lblakp2+mse2+fse2,nullH='location-scale')变量位置漂移模型位置-尺度漂移lgdp21.2290.636*lexp21.7440.309*lblakp20.631*1.080mse21.0180.895*fse20.9100.763*总计3.0932.532*查表可知，在0.1的显著性水平下，两种模型都不能被拒绝但从统计量数值看，位置尺度漂移模型相对更合理八、总结线性分位数回归模型中的应用，quantreg中的基本函数和分析流程分位数模型与传统回归模型相比，回归参数更加稳健，同时可以反映更多的信息通过不同分位数水平的残差分布，可以对位置-漂移模型和位置-尺度漂移模型做出检验quantreg包中还包括非参数统计的分位数估计，此外，分位数回归在时间序列方面也逐渐有更多的应用