2017-09-19 3 views
0

Ich versuche, Daten zu verschrotten und eines der Daten ist auch das Bild, das in Daten uri eingebettet ist. Ich kann es mir nicht vorstellen, das mit r zu machen.Bild von Daten uri

library(rvest) 
webUrl<-"https://portaltramites.inpi.gob.ar/Marcas/Logo?Acta=3363531" 

imgscr<- read_html(webUrl) %>% 
html_node(xpath = '//*/img') %>% 
html_attr('src') 

img<-gsub("data:image/gif;base64,","",imgsrc, fixed=true) 

head(img) 

#now I'm stuck 

Antwort

0
library(rvest) 
library(openssl) 
library(magick) 

pg <- read_html("https://portaltramites.inpi.gob.ar/Marcas/Logo?Acta=3363531") 

img <- html_nodes(pg, "img") 

img_src <- html_attr(img, "src") 
img_src <- gsub("^data.*base64,", "", img_src) 

image_read(base64_decode(img_src)) 

Sie können dann mit anderen magick Paket Funktionen zum Speichern/manipulieren/etc.

+0

Funktioniert perfekt! Vielen Dank. – Urgo