Same code gives results for different rows during scraping data

Question

structure(list(Property = c("1B - Anantara", "1B - Mag540", "1B- Downtown Views", 
"1B- Tiara Tanzanite", "1B-Address JBR", "1B-Al Samar 1"), Airbnb_link = c("https://www.airbnb.co.in/rooms/552037226634913505?preview_for_ml=true&source_impression_id=p3_1654086364_RJjGWicrEoR%2FB%2Bgu", 
"https://www.airbnb.co.in/rooms/54045333?preview_for_ml=true&source_impression_id=p3_1644216409_ftDpMWrY34gbixtv", 
"https://www.airbnb.co.in/rooms/54360731?preview_for_ml=true&source_impression_id=p3_1649243904_EjWEoEoKTYpW1zaT", 
"https://www.airbnb.co.in/rooms/565630731118783569?preview_for_ml=true&source_impression_id=p3_1649245563_mMhnLLQhlqTS26sb", 
"https://www.airbnb.co.in/rooms/53245239?preview_for_ml=true&source_impression_id=p3_1644215345_i3xkL5TcGvenCy2j", 
"https://www.airbnb.co.in/rooms/582870857307525571?preview_for_ml=true&source_impression_id=p3_1649244680_HqkKrgHn26RnnioX"
)), row.names = c(NA, -6L), class = c("tbl_df", "tbl", "data.frame"
))

i have written same code sometimes it scrapes complete data sometime it gives Character(0) all property i don't know why this is happening i have given two instances where it gives NA for all property but sometimes same code gives result for all the property some times it gives result for some and leaves NA for Remaining.

library(rvest)
library(dplyr)
library(RSelenium)
rD <-  rsDriver(browser="chrome",port=5234L,chromever="105.0.5195.19")
remDr <- rD$client

Airbnb_link$Review_count <- sapply(Airbnb_link$Airbnb_link,function(url) {
  remDr$navigate(url)
  remDr$getPageSource()[[1]] %>% 
    read_html() %>% 
    html_nodes("span._s65ijh7") %>% 
    html_text2()
})

Same code gives results for different rows during scraping data

0 Answers