借助以下代码,我每天都可以获取股票信息。但是有一种方法可以在一分钟内获得它。请帮助
symbols <- c("GODREJIND.NS", "ASHOKLEY.NS")
sd <- as.Date("2019-10-25")
ed <- as.Date("2019-10-31")
tq_get(symbols,
from = sd,
to = ed )
答案 0 :(得分:0)
在数据中,如果日期为“ YYYY-MM-dd HH:MM:SS”格式,则可以使用以下代码提取分钟数据。
df$MINUTES_sd <- minutes(df$sd)
df$MINUTES_ed <- minutes(df$ed)
同样,您可以从数据中提取年,月,日,小时,以进一步分析数据集。 例如:
df <- data.frame(symbol=c("GODREJIND.NS", "ASHOKLEY.NS"),sd="2019-10-
25",ed='2019-10-31')
df$YEAR_sd <- year(df$sd)
df$MONTH_sd <- month(df$sd)
df$DAY_sd <- day(df$sd)
df$YEAR_ed <- year(df$ed)
df$MONTH_ed <- month(df$ed)
df$DAY_ed <- day(df$ed)