Download png/jpg with R

Question

Tüm resimleri ben indirmek istiyorum this site ama fotoğrafları indirdikten sonra hepsi bozuk. Onları başarıyla indirmek için ne yapmalıyım?

Kodum:

library(XML) 
dir.create('c:/photos') 
urls<-paste("http://thedevilsguard.tumblr.com/page/",1:1870,sep="") 
doc<-htmlParse(urls[1]) 
links<-unique(unlist(xpathApply(doc,'//div[@class="timestamp"]/a',xmlGetAttr,'href'))) 
for (i in 1:length(links)){ 
    doc2<-htmlParse(links[i]) 
    link<-xpathApply(doc2,'//div[@class="centre photopage"]//p//img',xmlGetAttr,'src')[[1]][1] 
    download.file(link,paste("C:/photos/",basename(link),"")) 
} 

Answer 1

Yani Windows altındasınız. İkili dosyaları indirdiğinizde, ikili olarak modunu belirtmeniz gerekir, ör.

download.file(link, ..., mode = 'wb') 

Detaylar için ?download.file görüyoruz.

Answer 2

Birincisi, denemek ve birini indirin. Bunu yapın:

link = "http://29.media.tumblr.com/tumblr_m0q2g8mhGK1qk6uvyo1_500.png" 
download.file(link,basename(link)) 

Bu işe yarıyor mu?

Bir PNG'sini ve JPEG'I DEĞİLDİR, belki de JPEG olarak okumaya çalışıyorsunuzdur.