提取网页的位置坐标

Question

我想在网页上提取每个待售房屋的坐标，但我无法获得。 页面如下：

https://www.fincaraiz.com.co/casa-en-venta/cali/valle_del_lili-det-4710841.aspx#pnlMap



 require(rvest)

    pageurl <- "https://www.fincaraiz.com.co/casa-en-venta/cali/valle_del_lili-det-4710841.aspx"

    htmlpage <- read_html(pageurl)



    htmlpage %>%
      html_nodes(
##I can't think of how to continue

我希望通过 HTML 获得房子的坐标。

Answer 1

如 cmets 中所述，您可以在其中一个脚本标签中使用 javascript 字典进行正则表达式并使用 json 解析器进行解析以获取这些值。如果您想了解有关列表的其他信息，我会选择较大的对象。

library(rvest)
library(stringr)
library(magrittr)
library(jsonlite)

r <- read_html('https://www.fincaraiz.com.co/casa-en-venta/cali/valle_del_lili-det-4710841.aspx#pnlMap') %>%
  html_node('body') %>%
  html_text() %>%
  toString()
data <- str_match_all(r,'var sfAdvert = (.*?);')
data <- data.frame(jsonlite::fromJSON(data[[1]][,2]))

print(data$Latitude)
print(data$Longitude)