Fehler in file.download wenn benutzerdefinierte Datei herunterzuladen

Question

Ich versuche, die Zip-Datei von dieser URL heruntergeladen werden:

url1 <- http://www.clinicaltrials.gov/ct2/results?cond=%22acne%22&studyxml=true 

Hier ist mein Code:

tempZip <- tempfile() 
download.file(url1, tempZip) 

Und hier ist der Fehler, den ich erhalten:

Warning message: 
In download.file(url1, tempZip) : 
    downloaded length 817445 != reported length 200 

Irgendwelche Ideen?

EDIT: OK, nachdem Agstudy Antwort unten gesehen habe, fand ich, dass die Datei tatsächlich heruntergeladen wurde (es scheint auch die richtige Dateigröße zu sein). Jetzt ist das Problem, wenn ich versuche, die Datei zu entpacken - es Tage ist die Datei beschädigt.

Maciej, ich stimme zu, dass es besser wäre, einen Link mit einer .zip-Erweiterung zu verwenden, aber es gibt keine Möglichkeit, das von dieser Website zu bekommen.

Answer 1

OK, ich habe herausgefunden, was los war. Da diese URL am Ende nicht speziell ".zip" enthält, weiß die download.file-Funktion nicht, einen binären Download zu verwenden. Dieser Code behebt das Problem:

url1 <- http://www.clinicaltrials.gov/ct2/results?cond=%22acne%22&studyxml=true 
tempZip <- tempfile() 
download.file(url1, tempZip, mode="wb") 

Wenn Sie das Modusargument nicht angeben, ist die heruntergeladene ZIP-Datei beschädigt.

Answer 2

Sie haben keinen direkten Link zu der Datei. R versuchen, Webseite nicht herunterzuladen. Verwenden Sie den Link, der mit '.zip' endet.

Vielleicht nützlich mit XML oder RCurl Paket zu kratzen Links zu Datensätzen von dieser Webseite.