library(xlsxjars)
library(rJava)
library(xlsx)
library(urca)
library(lmtest)
library(MASS)
library(sandwich)
library(strucchange)
library(vars)
xlsx1<-read.xlsx("C:\Users\Desktop\STOCKINDEX.xlsx",1,encoding="UTF-8")
xlsx2<-read.xlsx("C:\Users\Desktop\PRICE.xlsx",1,encoding="UTF-8")
stockindex<-ts(xlsx1$stockindex,start=c(2010,6),end=c(2017,12),frequency=12)
price<-ts(xlsx2$price,start=c(2010,6),end=c(2017,12),frequency=12)
ln_stockindex<-log(stockindex)
ln_price<-log(price)
data.new<-data.frame(ln_stockindex,ln_price)
VARselect(data.new,lag.max=10,type="const")
如何解决
Error in y - z$residuals : 二进列运算符中有非数值参数
R语言 VAR模型 滞后阶数判断
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
1条回答 默认 最新
悬赏问题
- ¥15 如何在scanpy上做差异基因和通路富集?
- ¥20 关于#硬件工程#的问题,请各位专家解答!
- ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
- ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
- ¥30 截图中的mathematics程序转换成matlab
- ¥15 动力学代码报错,维度不匹配
- ¥15 Power query添加列问题
- ¥50 Kubernetes&Fission&Eleasticsearch
- ¥15 報錯:Person is not mapped,如何解決?
- ¥15 c++头文件不能识别CDialog