【急】r语言循环语句为啥只循环两次？手动循环不要太顺利啊

请教大佬们，

r语言循环语句为啥只循环两次？手动循环的时候不要太顺利

library(RMySQL)
library(DBI)
library(stats)   
#library(TTR)
library(zoo)         
library(xts)      
library(tseries)      
#library(TSA)
library(forecast)
library(stringr)

product_circle<-c(21)

DATA_SALES = dbGetQuery(mysqlconnection,sql)    #  9304
q=dim(DATA_SALES)[1]/255
sales_pred=NULL
########repeat循环########
i=0
repeat  {
m<-DATA_SALES[1+i*255:255+i*255,]
ts_sales_s<-ts(m[,5])
arima_sale<-auto.arima(ts_sales_s) #,period=7）
browser()
pred_arima_sale <-forecast(arima_sale,h=product_circle)
sum_pred<-sum(pred_arima_sale$mean)
sale_pred=c(m[1,1],m[1,2],m[1,3],as.Date(Sys.Date()),as.Date(Sys.Date()+product_circle),sum_pred)
sales_pred<-rbind(sales_pred,sale_pred)
i=i+1
if(i>q-1)  { break
}
}
head(sales_pred)


为啥只循环两次啊