Question

在使用rvest包时我试图在R中打印/显示lego_movie海报。我没有这样做。这是我的尝试：

library(rvest)
poster <- lego_movie %>%
  html_nodes("#img_primary img") %>%
  html_attr("src")

## 1st attempt
library(jpeg)
jpeg(poster)
dev.off()

## 2nd attempt
readJPEG(poster)
dev.off()

我认为EBImage具有display功能。此套餐无法安装在R-3.1.2中。它显示警告消息：package ‘EBImage’ is not available (for R version 3.1.2)。

我的问题的底线是：如何在不使用EBImage包的情况下将R中的jpeg文件视为显示？

很少有相关问题：

Plot a JPG image using base graphics in R

How to save a plot as image on the disk?

Answer 1

以下是您可以构建的一些入门代码：

library(rvest)
library(httr)
library(jpeg)

lego_movie <- html("http://www.imdb.com/title/tt1490017/")

poster <- lego_movie %>%
  html_nodes("#img_primary img") %>%
  html_attr("src")

GET(poster, write_disk("lego.jpg"))
img <- readJPEG("lego.jpg")
plot(1:2, type='n')
rasterImage(img, 1, 1.25, 1.1, 1)

在R中打印/显示JPG文件

1 个答案: