楼主: zyjzyjzy
8962 2

[问答] R软件找不到对象问题 [推广有奖]

  • 0关注
  • 0粉丝

学前班

40%

还不是VIP/贵宾

-

威望
0
论坛币
10 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
20 点
帖子
1
精华
0
在线时间
0 小时
注册时间
2017-10-31
最后登录
2017-10-31

相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
搜狗截图_2017-10-31_20-19-50.png 输入这个后一直显示找不到各种对象怎么办
setwd('C:\Users\\Administrator\\Documents\\WeChat Files\\JDfrom96\\Files')
library(vars)
1)平稳性
CPIM<-read.csv('利率数据.csv')
CM<-CPIM[,c('存款基准利率','贷款基准利率')]
summary(CM)
plot(CM$存款基准利率,xlab="month",type='line')
plot(CM$贷款基准利率,xlab="month",type='line')
library(urca)
adf1<-summary(ur.df(CM[,"存款基准利率"],type="drift"))
adf1
adf2<-summary(ur.df(CM[,"贷款基准利率"],type="trend"))
adf2
CM1<-CPIM[,c('存款基准利率','dlgMS')]
plot(CM1$dlg贷款基准利率,xlab="month",type='line')
adf3<-summary(ur.df(CM1[,"dlgMS"],type="none"))
adf3
2)varselect
VARselect(CM1,lag.max=8,type="both")
p1ct<-VAR(CM1,p=1,type="both")
summary(p1ct,equation="贷款基准利率")
plot(p1ct,names="存款基准利率")
3)VAR残差自相关和正态
ser11<-serial.test(p1ct,lags.pt=16,type="PT.asymptotic")
ser11$serial
不存在自相关
norm1<-normality.test(p1ct)
norm1$jb.mul
4)残差异方差检验和结构性稳定
arch1<-arch.test(p1ct,lags.multi=3)
arch1$arch.mul
plot(arch1,names="存款基准利率")
plot(stability(p1ct),nc=2)
5)脉冲相应
p1ct.irf<-irf(p1ct,response="dlgMS",boot=TRUE,ci=0.95)
plot(p1ct.irf)
6)方差分解
fevd.p1ct<-fevd(p1ct,n.ahead=6)
plot(fevd.p1ct,plot.type="single")
print(fevd.p1ct)               

二维码

扫码加我 拉你入群

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

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

关键词:找不到对象 r软件 documents Document Library

沙发
糯米JI 发表于 2017-10-31 23:39:01 |只看作者 |坛友微信交流群
为什么我看你的图觉得你是只执行了一行代码...

使用道具

藤椅
gujingshui 发表于 2017-11-1 06:22:47 来自手机 |只看作者 |坛友微信交流群
zyjzyjzy 发表于 2017-10-31 20:20
输入这个后一直显示找不到各种对象怎么办
setwd('C:\Users\\Administrator\\Documents\\WeChat Files\\JDf ...
找不到对象,那就预祝光棍节快乐

使用道具

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

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

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

GMT+8, 2024-9-20 13:33