在BCDating软件包中使用BBQ功能时出错

Question

使用BCDating R包中的BBQ函数接收以下错误，并且似乎无法查明原因：

  

if（bcp [i]-bcp [i-1]

为了重新创建它：

library(readxl)
library(BCDating)
library(dplyr)
url <- "https://www.philadelphiafed.org/-/media/research-and-data/regional- 
economy/indexes/coincident/coincident-revised.xls?la=en"
destfile <- "coincident-revised.xls"
download.file(url, destfile, mode = 'wb')
coincident <-read_excel("coincident-revised.xls")
coincident2<- coincident %>% 
 select(-Date) %>% 
 mutate_if(is.character,as.numeric) %>% 
 na.omit()
attach(coincident2)

此错误仅在佐治亚州（GA列）发生。通过将FL和GA都转换为时间序列，然后在其上运行BBQ，可以看出这一点。 FL在GA出现错误时起作用：

fcoincident<- ts(FL, start=c(1979, 4), frequency=12)
mod3<- BBQ(fcoincident, mincycle = 12, minphase = 6, name= main)
gcoincident<- ts(GA, start=c(1979, 4), frequency=12)
mod2<- BBQ(gcoincident, mincycle = 12, minphase = 6, name= main)

任何帮助您理解/纠正此错误的信息！

Answer 1

更新：这可以通过减少函数中的最小相位输入来解决。但是，这仅在某些情况下有效。如果您在使用Bry-Boschan方法时遇到问题，建议您在Metro Business Cycles中编写代码以使用非参数算法（特别是在进行状态或MSA级别分析时特别有用）。