comment faire pour télécharger et afficher une image à partir d'une URL dans la R?

Mon objectif est de télécharger une image à partir d'une URL, puis l'afficher dans R.

J'ai eu une URL et compris comment le télécharger. Mais le fichier téléchargé ne peuvent pas être prévisualisés parce qu'il est "abîmé, endommagé ou s'il est trop grand".

y = "http://upload.wikimedia.org/wikipedia/commons/5/5d/AaronEckhart10TIFF.jpg"
download.file(y, 'y.jpg')

J'ai aussi essayé

image('y.jpg')

dans R, mais le message d'erreur s'affiche comme:

Error in image.default("y.jpg") : argument must be matrix-like

Des suggestions?

Semble que le problème sous-jacent est le même que ici

OriginalL'auteur user3768495 | 2015-03-17

  1. 19

    Si j'essaie de votre code, il ressemble à l'image est téléchargée. Toutefois, lorsqu'il est ouvert avec windows visionneuse d'image il a également dit qu'il est corrompu.
    La raison pour cela est que vous n'avez pas spécifié le mode dans le download.file déclaration.

    Essayez ceci:

    download.file(y,'y.jpg', mode = 'wb')

    Pour plus d'infos sur la mode, c'est de voir ?download.file

    De cette façon, à moins que le fichier que vous avez téléchargé est de travail.

    Pour afficher l'image dans R, avoir un regard sur 

    jj <- readJPEG("y.jpg",native=TRUE)
plot(0:1,0:1,type="n",ann=FALSE,axes=FALSE)
rasterImage(jj,0,0,1,1)

    ou comment read.jpeg dans la R 2.15
    ou L'affichage des images dans la R version 3.1.0

    Petit ajout: readJPEG est dans le package R jpeg
    Merci! Il fonctionne maintenant. Un suivi de la question: que dois-je faire si je ne veux pas le télécharger (enregistrer) le fichier jpeg sur le disque, mais juste l'enregistrer sur le lieu de travail?
    Vous pouvez télécharger l'image en tant que fichier temporaire. Veuillez accepter la première réponse si cela répond à votre question initiale

    OriginalL'auteur MichaelVE

  2. -1

    cela pourrait fonctionner aussi
    ici 

    library(jpeg)

library(png)

x <- "http://link..."    

image_name<- readJPEG(getURLcontent(x)) # for jpg

image_name<- readPNG(getURLcontent(x))# for png

    OriginalL'auteur jatin singh