使用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)
任何帮助您理解/纠正此错误的信息！