r - 使用 R 从推文中抓取图像

Question

我很想为某人发布的图像制作一个twitter-blogdown博客，但我不确定这是否可能。我使用“推特”来抓取一个人的所有帖子，但看起来我必须做一些完全不同的事情来获取图像而不是文本。

任何关于采取什么方向的建议将不胜感激。

Answer 1

相当广泛的问题，但这里有一些想法。

首先：我推荐使用rtweet包。以我的经验，它使身份验证变得更加容易，并以易于使用的结构返回数据。

例如，在按照包文档中的描述设置身份验证后，我将如何获取自己的最后 100 条推文：

library(rtweet)
library(dplyr)

neilfws <- get_timeline("neilfws", n = 100)
neilfws %>%
  glimpse()

该列media_id指示推文是否已附加媒体，如果没有，则 value = NA。所以快速计算有多少行有媒体：

neilfws %>%
  filter(!is.na(media_id) %>%
  nrow()

媒体链接在专栏中media_url。所以这里是与我的推文相关的前 6 张图片：

neilfws %>% 
  filter(!is.na(media_id)) %>% 
  select(media_url) %>% 
  head()

1 http://pbs.twimg.com/media/DHzGbvyVoAAm8in.jpg
2 http://pbs.twimg.com/media/DHfc4idV0AA6qyc.jpg
3 http://pbs.twimg.com/media/DHfNamEVYAA5H_U.jpg
4 http://pbs.twimg.com/media/DHYuG1oUwAADV-z.jpg
5 http://pbs.twimg.com/media/DHQlEQqUAAAHoCK.jpg
6 http://pbs.twimg.com/media/DHLG_ESUMAAMURj.jpg

现在您有了媒体 URL，您可以使用代码来检索或显示它们。