Как получить элемент href с помощью RSelenium из этого кода? - PullRequest
Новая
       6

Как получить элемент href с помощью RSelenium из этого кода?

0 голосов
/ 14 апреля 2019

Я использую Rselenium для получения URL, и я не понимаю, почему он не работает.

Мой код: 

    links <- remDr$findElements(using = "xpath", value = "//*[@class 
    = 
    'item-info']")
     final_link <- data.frame(link = unlist(sapply(links, function(x) 
     {x$getElementAttribute('href')})))

код страницы: 

<div class="item-info">
<p class="title product-field" translate="no" data-track-info=" 
{&quot;description&quot;:&quot;title&quot;}" data-force-track="">
       <a href="https://www.kobo.com/us/en/ebook/added-youth" 
 class="">Added Youth</a>
 </p>
 <p class="subtitle product-field" translate="no" data-track-info=" 
     {&quot;description&quot;:&quot;subtitle&quot;}" data-force-track="">
       <a href="https://www.kobo.com/us/en/ebook/added-youth" class="">All Natural Anti-Aging Program</a>
  </p>

Ожидаемый результат - ссылка, в данном случае: https://www.kobo.com/us/en/ebook/added-youth

1 Ответ

0 голосов
/ 14 апреля 2019

Мой код: 

page <- read_html(paste0(urls1[[i]]))

links <- page %>% 
      html_nodes("a") %>%
      html_attr("href")
...