楼主: 百草枯julio
12690 44

[程序分享] MATLAB做空间计量的hausman检验求助 [推广有奖]

  • 2关注
  • 1粉丝

硕士生

85%

还不是VIP/贵宾

-

威望
0
论坛币
1603 个
通用积分
1.0540
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
807 点
帖子
28
精华
0
在线时间
367 小时
注册时间
2015-10-14
最后登录
2023-1-7

相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
请教各位大神,我在用MATLAB做空间计量的hausman检验时,输入程序hausman=(blagfe-blagre)'*inv(covblagre-covblagfe)*(blagfe-blagre); 结果显示:错误》矩阵维度必须一致。想请教各位,这是哪里出了问题,应该如何解决。
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:Hausman检验 hausman MATLAB ausman matla

沙发
Hellen-Violin 发表于 2018-2-27 18:35:05 来自手机 |只看作者 |坛友微信交流群
请问具体口令能告知一下么?

使用道具

藤椅
百草枯julio 发表于 2018-2-27 23:03:12 |只看作者 |坛友微信交流群
Hellen-Violin 发表于 2018-2-27 18:35
请问具体口令能告知一下么?
完整的程序是
%%读取数据
xlsread('data',1);
[data,name]=xlsread('data',1);
%%读取权重矩阵
weight=xlsread('juliW.xlsx');
%标准化
W=normw(weight);
T=9;
N=30;
nobs=N*T;
%提取变量
y=data(:,[3]);
x=data(:,[6,7,8,9,10,12,13]);
for t=1:T
    t1=(t-1)*N+1;t2=t*N;
    wx(t1:t2,:)=W*x(t1:t2,:);
end
xconstant=ones(N*T,1);
[nobs K]=size(x);
info.bc=0;
info.lflag=0; % required for exact results
info.model=3;
info.fe=0; % Do not print intercept and fixed effects; use info.fe=1 to turn on
results=sar_panel_FE(y,[x wx],W,T,info);
vnames=strvcat('Y','way3','caizhengzc','FDI','xiaofeilsze','students','wages','cxsaving','W*way3','W*caizhengzc','W*FDI','W*xiaofeilsze','W*students','W*wages','W*cxsaving');
prt_spnew(results,vnames,1)
% Print out coefficient estimates
prt_sp(results,vnames,1);
% Print out effects estimates
spat_model=1;
direct_indirect_effects_estimates(results,W,spat_model);
panel_effects_sdm(results,vnames,W)

% Wald test for spatial Durbin model against spatial lag model
btemp=results.parm;
varcov=results.cov;
Rafg=zeros(K,2*K+2);
for k=1:K
    Rafg(k,K+k)=1; % R(1,3)=0 and R(2,4)=0;
end
Wald_spatial_lag=(Rafg*btemp)'*inv(Rafg*varcov*Rafg')*Rafg*btemp
prob_spatial_lag=1-chis_cdf (Wald_spatial_lag, K)

% Wald test spatial Durbin model against spatial error model
R=zeros(K,1);
for k=1:K
    R(k)=btemp(2*K+1)*btemp(k)+btemp(K+k); % k changed in 1, 7/12/2010
%   R(1)=btemp(5)*btemp(1)+btemp(3);
%   R(2)=btemp(5)*btemp(2)+btemp(4);
end
Rafg=zeros(K,2*K+2);
for k=1:K
    Rafg(k,k)    =btemp(2*K+1); % k changed in 1, 7/12/2010
    Rafg(k,K+k)  =1;
    Rafg(k,2*K+1)=btemp(k);
%   Rafg(1,1)=btemp(5);Rafg(1,3)=1;Rafg(1,5)=btemp(1);
%   Rafg(2,2)=btemp(5);Rafg(2,4)=1;Rafg(2,5)=btemp(2);
end   
Wald_spatial_error=R'*inv(Rafg*varcov*Rafg')*R
prob_spatial_error=1-chis_cdf (Wald_spatial_error,K)

%%LR test spatial lag
resultssar=sar_panel_FE(y,x,W,T,info);
LR_spatial_lag=-2*(resultssar.lik-results.lik)
prob_spatial_lag=1-chis_cdf (LR_spatial_lag,K)

%%LR test spatial error
resultssem=sem_panel_FE(y,x,W,T,info);
LR_spatial_error=-2*(resultssem.lik-results.lik)
prob_spatial_error=1-chis_cdf (LR_spatial_error,K)

% needed for Hausman test later on
logliklag=results.lik;
blagfe=results.parm(1:end-1);
covblagfe=results.cov(1:end-1,1:end-1);
% needed for Hausman test later on
logliklagre=results.lik;
blagre=results.parm(1:end-2);
covblagre=results.cov(1:end-2,1:end-2);
% ----------------------------------------------------------------------------------------
% Hausman test FE versus RE
hausman=(blagfe-blagre)'*inv(covblagre-covblagfe)*(blagfe-blagre);
dof=length(blagfe);
probability=1-chis_prb(abs(hausman),dof);
% Note: probability < 0.025 implies rejection of random effects model in favor of fixed effects model
% Use 0.025, since it is a one-sided test
fprintf(1,'Hausman test-statistic, degrees of freedom and probability = %9.4f,%6d,%9.4f \n',abs(hausman),dof,probability);
其余的语句都能运行,只是到最后的hausman检验这块运行不了,hausman=(blagfe-blagre)'*inv(covblagre-covblagfe)*(blagfe-blagre);

使用道具

板凳
z784055980 发表于 2018-3-31 17:03:14 |只看作者 |坛友微信交流群
请问你用的空间计量的工具包是哪一个呢,我用jplv7不知道能不能进行后面的wald检验、lr检验?

使用道具

报纸
Iron_517 学生认证  发表于 2018-4-9 09:06:35 |只看作者 |坛友微信交流群
你好,我也是在研究空间面板,可以一起交流下吗

使用道具

地板
taoxingpu 发表于 2018-4-19 20:22:04 |只看作者 |坛友微信交流群
求问楼主后来有解决吗?遇到了同样的问题

使用道具

7
ljk19911111 发表于 2018-6-20 00:33:07 |只看作者 |坛友微信交流群
请问楼主问题解决了吗?同问!

使用道具

8
071341 发表于 2018-7-26 17:14:27 |只看作者 |坛友微信交流群
百草枯julio 发表于 2018-2-27 23:03
完整的程序是
%%读取数据
xlsread('data',1);
请问,为什么我出不来wald检验的结果呢

使用道具

9
背向1 发表于 2018-8-10 16:21:09 |只看作者 |坛友微信交流群
百草枯julio 发表于 2018-2-27 23:03
完整的程序是
%%读取数据
xlsread('data',1);
楼主后面问题解决了吗?我也出现了相同的问题,求帮忙

使用道具

10
tanyongchuan 学生认证  发表于 2018-11-4 10:20:16 |只看作者 |坛友微信交流群
你这程序写的都不对

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-19 22:59