Попробуйте поймать застрял в бесконечном цикле при загрузке данных в R
Я загружаю данные об акциях из quandl и использую trycatch для отлова акций, данные которых не могут быть загружены. из примерно 800 акций 9 выдают ошибку, но уловка попытки застревает в бесконечном цикле и не записывает файлы csv для других акций. Я не хочу, чтобы команда пыталась загрузить данные снова. Как мне выйти из цикла?
Вот код:
постоянная декларация
date_Start<-Sys.Date()-1
date_End<-Sys.Date()
#loop for downloading todays's data
stocksData<-lapply(stockName,function(x,start_date,end_date){
startDate<-date_Start
endDate<-date_End
path<- path_Data
from.dat <- as.Date(startDate, format="%m/%d/%y")
to.dat <- as.Date(endDate, format="%m/%d/%y")
stockNameNew <- gsub("[/]","_",x)
#to remove the "." from stocknames and replace it by "_"
for(i in stockName){
downloadData <-tryCatch(Quandl(i,type = "xts",start_date = from.dat,end_date = to.dat),error=identity)
if(inherits(downloadData, "error"))
cat("Symbol '", i, "' not downloadable!\n", sep = "")
}
#downloads data from quandl
stockData <- as.data.frame(downloadData)
write.csv(stockData,fileName)
#csv file is created
})
Выход:
Символ 'NSE/GSPL' не загружается! Символ 'NSE/INDHOTEL' не загружается! Символ 'NSE/KOTAKGOLD' не загружается! Символ 'NSE/GSPL' не загружается! Символ 'NSE/INDHOTEL' не загружается! Символ 'NSE/KOTAKGOLD' не загружается!
repeated continuously...