I have this website which has a table of many pages. Can someone help me read all pages of that table into R?
Website:
https://www.fdic.gov/bank/individual/failed/banklist.html
You can scrape the entire HTML table using the rvest package. See the code below. The code automatically identifies the entire table and reads in all 555 entries.
require(rvest)
URL <- "https://www.fdic.gov/bank/individual/failed/banklist.html"
failed_banks <- URL %>%
read_html() %>%
html_table() %>%
as.data.frame()
Related
I am currently working a project to scrape the content of the Performance Characteristics table on this website
https://www.ishares.com/uk/individual/en/products/251795/ishares-ftse-100-ucits-etf-inc-fund
The data I am wanting to extract from this table is the 12 m trailing yield of 3.43%
The code I wrote to do this is:
url <- "https://www.ishares.com/uk/individual/en/products/251795/ishares-ftse-100-ucits-etf-inc-fund"
etf_Data <- url %>%
read_html() %>%
html_nodes(xpath='//*[#id="fundamentalsAndRisk"]/div') %>%
html_table()
etf_Data <- etf_Data[[1]]
which provided me with an empty list with the error message 'Error in etf_Data[[1]] : subscript out of bounds'
Using Google inspect I have tried various XPaths including reading it in html_text:
url <- "https://www.ishares.com/uk/individual/en/products/251795/ishares-ftse-100-ucits-etf-inc-fund"
etf_Data <- url %>%
read_html() %>%
html_nodes(xpath='//*[#id="fundamentalsAndRisk"]/div/div[4]/span[2]') %>%
html_text()
etf_Data <- etf_Data[[1]]
However with no success.
Having gone through other Stack Overflow responses I have not been able to solve my issue.
Would someone be able to assist.
Thank you
C
Couple of things:
There is a different URI you end up at in order to get the content you want. This comes when you manually accept certain conditions on the page
The data you want is not within a table
You can add a queryString with EntryPassthrough parameter = True to get to the right URI and then use :contains and an adjacent sibling combinator to get the desired value
library(rvest)
library(magrittr)
url <- "https://www.ishares.com/uk/individual/en/products/251795/ishares-ftse-100-ucits-etf-inc-fund?switchLocale=y&siteEntryPassthrough=true"
trailing_12m_yield <- url %>%
read_html() %>%
html_element('.caption:contains("12m Trailing Yield") + .data') %>% html_text2()
I'm trying to web scrape housing data using the rvest package, but I'm having difficulty identifying html nodes. My (generic) R code is as follows:
housing_wp <- read_html("webpage")
address <- housing_wp %>%
html_nodes("a.unhideListingLink") %>%
html_text()
address
The html code inspected is in the following link that contains the data I am trying to input into a table in R. What am I doing wrong?
HTML
i'm using xpath and rvest for scraping an htm page. Other examples of rvest work well with pipelines, but for this particular script nothing is returned.
webpage <- read_html("https://www.sec.gov/litigation/admin/34-45135.htm")
whomst <- webpage %>% html_nodes(xpath = '/html/body/table[2]/tbody/tr/td[3]/font/p[1]/table/tbody/tr/td[1]/p[2]')
What is returned is :
{xml_nodeset (0)}
Here is a screenshot of the page and the corresponding html
And here's the page that I'm on: https://www.sec.gov/litigation/admin/34-45135.htm. I'm trying to extract the words, "PINNACLE HOLDINGS, INC."
Sometimes chrome tool doesn't give accurate xpath or css, you need to try by yourself, this selector works:
webpage %>% html_nodes("td > p:nth-child(3)") %>% html_text()
result:
[1] "PINNACLE HOLDINGS, INC., \n
I am currently trying to extract the URLs from the wikipedia page with a list of chief executive officers, the code then opens the URLs and copies the text into .txt files for me to use. the trouble is the allurls object only contains the later half of the URL. For example allurls[1] gives ""/wiki/Pierre_Nanterme"". Thus when I run this code
library("xml2")
library("rvest")
url <- "https://en.wikipedia.org/wiki/List_of_chief_executive_officers"
allurls <- url %>% read_html() %>% html_nodes("td:nth-child(2) a") %>%
html_attr("href") %>%
.[!duplicated(.)]%>%lapply(function(x)
read_html(x)%>%html_nodes("body"))%>%
Map(function(x,y)
write_html(x,tempfile(y,fileext=".txt"),options="format"),.,
c(paste("tmp",1:length(.))))
allurls[1]
I get the following error:
Error: '/wiki/Pierre_Nanterme' does not exist.
I'm trying to scrape a set of web pages with rvest package. It works when getting the content of the web pages, but I can't get create time for the first floor, which is 2017-08-17 01:47 for this web page.
url <- read_html("http://tieba.baidu.com/p/5275787419", encoding = "UTF-8")
# This works
contents <- url %>% html_nodes(".d_post_content_firstfloor .clearfix") %>% html_text()
# This doesn't work
create_time <- url %>% html_nodes(".d_post_content_firstfloor li+ li span") %>% html_text()
create_time
character(0)
I want to get the time of first floor on the web but I don't know how to access to it.
One way to achieve this could be
create_time<- url %>% html_nodes(xpath= '//*[#id="j_p_postlist"]/div[1]') %>% xml_attr("data-field")
gsub(".*date\\\":\\\"(.*)\\\",\\\"vote_crypt.*","\\1",create_time)
Output is:
[1] "2017-08-17 01:47"
Hope this helps!