R语言MSwM包运行出现如下错误，请教如何修改

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

library(WindR)
w.start()
#提取债市、股市收益率数据
Data1<-w_edb_data<-w.edb('S0059749,M0049384','2002-01-01',Sys.Date())
library(quantmod)
X<-xts(Data1$Data[,-1],Data1$Data[,1])
colnames(X)<-c("BY","PE")
GEYR<-((X$BY/100)*(X$PE))
#MSwM
install.packages("MSwM")
library(MSwM)
mod<-lm(GEYR~1)
model<-msmFit(mod,k=2,sw=c(T,T),p=0)

运行上述代码，报如下错误:
Error in (function (classes, fdef, mtable)  :
  unable to find an inherited method for function ‘msmFit’ for signature ‘"lm", "numeric", "numeric", "numeric", "missing", "missing"’
请教各位大神该如何修正呢？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

您好，解决了吗

不支持这类模型估计；