R：LinkedIn 使用 rvest 抓取

Question

使用rvest 包，我正在尝试从我的LinkedIn profile 中抓取数据。

这些尝试：

library(rvest)
url = "https://www.linkedin.com/profile/view?id=AAIAAAFqgUsBB2262LNIUKpTcr0cF_ekoX9ZJh0&trk=nav_responsive_tab_profile"
li = read_html(url)
html_nodes(li, "#experience-316254584-view span.field-text")
html_nodes(li, xpath='//*[@id="experience-610617015-view"]/p/span/text()')

没有找到任何节点：

#> {xml_nodeset (0)}

问：如何只返回文本？

#> "Quantitative hedge fund manager selection for $650m portfolio of alternative investments"

编辑：

LinkedIn 有一个 API，但由于某种原因，下面只返回前两个经验职位，没有其他项目（如教育、项目）。因此采用了抓取方法。

library("Rlinkedin")
auth = inOAuth(application_name, consumer_key, consumer_secret)
getProfile(auth, connections = FALSE, id = NULL) # returns very limited data

Answer 1

您让事情变得不必要地困难......您需要做的就是在从 Linkedin 获得 OAuth 2.0 令牌后向https://api.linkedin.com/v1/people/~?format=json 发出 GET 请求。在 R 中，您可以使用 jsonlite：

library(jsonlite)
linkedin <- fromJSON('https://api.linkedin.com/v1/people/~?format=json')
position <- linkedin$headline

您必须对您的 oauth 令牌拥有“r_basicprofile”成员权限。