Comment télécharger et décompresser un fichier zippé raster directement dans r depuis github

Question

Je suis en train de télécharger le fichier 'Landsat.rar` (inclus 6 bandes Landsat) et de le décompresser directement dans r, mais cela ne fonctionne pas comme prévu . Merci de votre aide!

library(raster) 

ls_url<-"https://github.com/tuyenhavan/Landsat-Data/blob/LS7/Landsat.rar" 

temp<-tempfile() 

download.file(ls_url,temp) 

unzip(temp,"tif$") 

myls<-stack("tif$") 

Answer 1

Surtout si vous utilisez Windows, il est peut-être que vous devez utiliser le mode binaire download.file:

download.file(ls_url, temp, mode="wb") 

sinon le fichier est corrompu.

En outre, l'URL que vous utilisez est incorrecte. Vous avez utilisé celui pour l'interface web. Si vous voulez obtenir le fichier lui-même, vous devez utiliser (vérifier le lien associé au bouton « Télécharger »):

https://github.com/tuyenhavan/Landsat-Data/raw/LS7/Landsat.rar 

Enfin, unzip() ne sait pas comment gérer rar les fichiers d'archive. Si vous avez créé cette archive vous-même, utilisez plutôt le format zip; ou déroutez le fichier avec un autre programme (que vous pouvez appeler depuis R en utilisant system()).