R下载.RData

Question

我想从回购的开发分支下载一个.RData文件，作为在实现学习教程的.Rmd文件中开发安装块的一部分。当我从github手动下载文件时，load("./data_download/elic_2016_1.RData")成功地加载了下载的对象。但是，在下载带有.RData ()的download.file文件后，随后的load()将产生一个错误，

download.file("https://github.com/pbpearman/r-consortium-proposal/blob/interactive/material/lessons/switzerland-dual-use/data_clean/elic_2016_1.RData", destfile= "./data_download/elic_2016_1.RData", mode = "wb")
load("./data_download/elic_2016_1.RData")

文件‘elic_2016_1.RData’有神奇的号码'‘ 2之前保存版本的使用是deprecatedError in load("./data_download/elic_2016_1.RData") 错误的还原文件魔术号(文件可能损坏) --没有加载数据

我也尝试过这样做，在stackoverflow.com/questions/26108575之后：

load(url("https://github.com/pbpearman/r-consortium-proposal/blob/interactive/material/lessons/switzerland-dual-use/data_clean/elic_2016_1.RData"))

装入错误(url(“1.RData”))：输入不以与从连接加载兼容的神奇数字开头

我用当前安装的R版本创建了该文件。由于手动下载的文件加载成功，所以Github上的文件elic_2016_1.RData似乎没有损坏。无论是在块内逐行运行代码，还是从命令行运行每一行，都会发生相同的错误。我试着压缩和上传.RData文件，但是在下载和解压缩时它仍然被破坏。

出了什么问题，我如何从回购中下载.RData文件并将其加载到R中？

我使用的是R版本3.4.2和RStudio 1.1.383。

Answer 1

问题是您正在从github下载一个HTML文件。如果您更改URL并添加''?raw=true'‘，它将下载该文件：

url <- "https://github.com/pbpearman/r-consortium-proposal/blob/interactive/material/lessons/switzerland-dual-use/data_clean/elic_2016_1.RData?raw=true"

download.file(url, destfile= "./data_download/elic_2016_1.RData", mode = "wb")
load("./data_download/elic_2016_1.RData")

elic_2016_1
# A tibble: 3,083 x 8
   Quartal Geschäftsnummer Bestimmungsland                     Güterart
     <chr>           <dbl>           <chr>                        <chr>
 1   16/01         8007724         Ägypten               Dual Use Güter
 2   16/01         8007844         Ägypten               Dual Use Güter
 3   16/01         8007844         Ägypten               Dual Use Güter
 4   16/01         8007844         Ägypten               Dual Use Güter
 5   16/01         8006915         Ägypten               Dual Use Güter
 6   16/01         8006792         Ägypten National kontrollierte Güter
 7   16/01         8006792         Ägypten National kontrollierte Güter
 8   16/01         8006402         Ägypten               Dual Use Güter
 9   16/01         8006496         Ägypten               Dual Use Güter
10   16/01         8007768        Algerien               Dual Use Güter
# ... with 3,073 more rows, and 4 more variables: Geschäftstyp <chr>,
#   Richtung <chr>, `Exportkontrollnummer [EKN]` <chr>, `Wert [CHF]` <dbl>

Answer 2

根据@克莱门斯的答复，以下输入应该有效：

load(url("https://github.com/pbpearman/r-consortium-proposal/blob/interactive/material/lessons/switzerland-dual-use/data_clean/elic_2016_1.RData?raw=true"))