Загрузите .rds с диска Google с помощью download.file () - PullRequest
1 голос
/ 06 мая 2020

У меня все еще возникают проблемы с получением большого файла (.rds) с диска Google в R. Цель состоит в том, чтобы извлечь файл rds с диска для использования в Rshiny.app.

Если я использую

library(googledrive)
temp <- tempfile(fileext = ".rds")
dl <- drive_download(
  as_id("XXXXXXXXX"), path = temp, overwrite = TRUE)
myObj<-readRDS(file = dl$local_path)

Работает нормально, потому что загружает файл по идентификатору в tempdir. Но тогда он требует аутентификации токена для tidyverse (почти) каждый раз.

Существуют и другие варианты, используя download.file(), как в R Как читать файл с диска Google с помощью R , однако я Я столкнулся с проблемой, что ссылка для совместного использования / загрузки приводит к запросу, уведомляющему пользователей о сканировании на вирусы.

Предупреждение о загрузке с Google Диска

Я пробовал прямые ссылки для скачивания, изменяя href, ссылку для совместного использования, но безуспешно. Есть идеи, как я могу обойти это, используя ссылку для совместного использования / загрузки и download.file()?

...