Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- library('rvest')
- url <- 'https://www.bankbazaar.com/home-loan.html'
- webpage<-read_html(url)
- #scraping names from list
- name_html <- html_nodes(webpage,'.js-offer-name')
- name_2_text<- data.frame('NameOfBank'=html_text(name_html))
- View(name_2_text)
- #scraping user_ratings from list
- percent_html <- html_nodes(webpage,'#offer-table .interest-rate-range span:nth-child(1)')
- percent_2_text<- data.frame('BankPercentage'=html_text(percent_html))
- View(percent_2_text)
- #creating dataframe for game_rankings
- #bank_data <- data.frame('NameOfBank'=name_2_text,')
- #View(bank_data)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement