我对 Rbbg 包相当陌生，所以请原谅我的任何无知，但是我想知道是否可以使用该bar()功能提取超过约 25 天的分钟柱数据。我发现我无法提取超过 25 或 26 天的数据，我想知道我是否做错了什么，或者是否不可能。
这是我正在使用的代码：
#install.packages("rJava")
#install.packages("Rbbg", repos="http://r.findata.org")
#install.packages("timeDate")
library(rJava)
library(Rbbg)
library(timeDate)
conn <- blpConnect()
weekdays = timeSequence(from = (Sys.Date()-38), to = (Sys.Date()-1), by = "day")[isWeekday(timeSequence(from = (Sys.Date()-38), to = (Sys.Date()-1), by = "day"))]
date_time=numeric()
volume=numeric()
for(i in 1:length(weekdays)){
start.date <- paste(weekdays[i],"13:30:00.000")
end.date <- paste(weekdays[i],"20:00:00.000")
raw=bar(conn, "GOOG US Equity", "TRADE", start.date, end.date, "1")
date_time=append(date_time,raw$time)
volume=append(volume,raw$volume)
}
date.time <- data.frame(do.call('rbind', strsplit(as.character(date_time),'T',fixed=TRUE)))
use=data.frame("date"=format(as.Date(date.time$X1), "%m/%d/%Y"),"time"=date.time$X2,"volume"=raw$volume)
blpDisconnect(conn)
这工作正常，并从过去 3.5 周的交易日中提取数据。现在，如果我尝试将行中的 38 更改为更大的数字weekdays = timeSequence(from = (Sys.Date()-38), to = (Sys.Date()-1), by = "day")[isWeekday(timeSequence(from = (Sys.Date()-38), to = (Sys.Date()-1), by = "day"))]，我会收到以下错误：Error in matrix.data[, 1] : subscript out of bounds当我尝试运行上述脚本时。
是不是 API 只能拉取大约 3.5 周的分钟柱数据？还是我做错了什么？理想情况下，我希望拥有至少 100 个交易日的数据。
谢谢大家的帮助。