2017-05-12 8 views

Antwort

2

Nur Speichern der Datei in den lokalen Werken:

library(RCurl) 
download.file("https://sidra.ibge.gov.br/geratabela?format=xlsx&name=tabela6402.xlsx&terr=N&rank=-&query=t/6402/n1/all/n2/all/v/4104/p/all/c86/all/d/v4104%201/l/v,p,t%2Bc86", "temp.xlsx") 
libary(readxl) 
tmp <- read_excel("temp.xlsx", skip = 2) 
+0

Danke, aber schauen, was passiert ist: > tmp <- read_excel ("temp.xlsx", überspringen = 2) Fehler in read_xlsx_ (Pfad, Blatt, col_names = col_names, col_types = col_types, : Fehler -103 mit zipfile in unzGetCurrentFileInfo –

2

Geben Sie dieser modifizierten Version einen Versuch.

library(RCurl) 
library(readxl) 

temp.file <- paste(tempfile(),".xlsx",sep = "") 
download.file("https://sidra.ibge.gov.br/geratabela?format=xlsx&name=tabela6402.xlsx&terr=N&rank=-&query=t/6402/n1/all/n2/all/v/4104/p/all/c86/all/d/v4104%201/l/v,p,t%2Bc86", temp.file, mode = "wb") 

tmp <- read_excel(temp.file, skip = 2) 
+0

Erstaunlich, das passt wie angegossen, perfekt, danke –