Я пытаюсь удалить список выставок со следующего веб-сайта: https://www.sistic.com.sg/attractions, и у меня возникла проблема с получением описаний в разделе «Загрузить еще». Ниже приведен код, над которым я работал до сих пор, но он дал мало результатов. Нужна помощь!
library(RSelenium)
library(rvest)
url <- 'https://www.sistic.com.sg/attractions'
webpage <- read_html(url)
load_btn <- ffd$findElement(using = "css selector", ".btn-link load-more-btn")
load_btn$clickElement()
Sys.sleep(2)
Description_html <- html_nodes(webpage,'.item-title')
Description_data <- html_text(Description_html)
Description_data