Question

1st file given in the URL named "EQUITY_L.csv" source given in the footnote below

我正在尝试使用NSE网站下面脚注中文件中提供的符号变量访问URL“ https://in.finance.yahoo.com/quote/3MINDIA.NS/history?p=3MINDIA.NS”。我可以通过代码从多个文件中获取数据，但是在数据表或总共250个URL中仅获取前100行。我无法解决问题。我还查看了每个URL中可用的表，并且只有一个表。如何获取每个URL中的全部250行？我看了一下quantmod函数，但是它具有美国特定的索引。您能帮上忙吗？。

read.csv(file="C:/Users/Documents/EQUITY_L.csv", header=TRUE, sep=",")

MyData$SYMBOL
Symbol<-MyData$SYMBOL
tbls_ls<-list()
for(i in 1:12) {
webpage<-paste0("https://in.finance.yahoo.com/quote/",Symbol[i],".NS","/history?p=",Symbol[i],".NS")
Webpage<-read_html(webpage)
tbls_ls[i] <- Webpage %>%
        html_nodes("table") %>%
        .[1] %>%
        html_table(fill = TRUE)}

Answer 1

嗯...似乎您在这里遇到了一些问题，最近对帖子的修改似乎已删除了其中的一些问题。如果您使用的是将data.frame强制变为没有行名的小标题的软件包，则会出现没有行名的问题。

我认为，如果您仅使用quantmod，它将解决这里的许多问题。它将返回一个xts对象，其中行名称存储为日期向量。默认设置将返回2942次观察值，或者，如果所讨论的证券已经存在了很长时间且不包含任何缺失值，则每日返回2007-01-02。

在上面修改代码：

MyData <- read.csv(file="C:/Users/Documents/EQUITY_L.csv", header=TRUE, sep=",")
Symbol<-MyData$SYMBOL

然后添加

library(quantmod)
getSymbols(Symbol)

就是这样！

r quantmod

多行R中的Web刮擦时缺少行-从印度NSE索引中刮擦时

1 个答案: