Загрузка файла в подкаталог Team Drive

Question

Как я могу успешно загрузить файл в подкаталог нашего командного диска?Использование drive_find() идентифицирует элементы в моем каталоге.Независимо от того, что я пытаюсь, лучшее, что я могу сделать, - это заставить файлы помещаться в корневой каталог командного диска.

Я успешно получаю список имен, идентификаторов и ресурсов диска из этого:

drive_find(team_drive = 'Data Analytics Team')

примерно так:

# A tibble: 29 x 3
   name                               id                                                drive_resource
 * <chr>                              <chr>                                             <list>        
 1 00.ExampleSubDirectory             1XoNCDizzZMHZ4sbBhnCXb-qokk8TW7Q_                 <list [30]>   
 2 df_iris_in-2019-05-01              1kXSD_t96roqeLuXb0BDJfpCejlyZCa6FSL2YtdeWtxE      <list [33]>   
 3 df_iris_in-2019-05-01              1qT_kRff8J8Qu5ZLxZhGLMDB7gO9O1PTtJ_KHsjItgFI      <list [33]>   

Когда я пытаюсь использовать пример идентификатора подкаталога примерно так:

td <- team_drive_get(as_id("1XoNCDizzZMHZ4sbBhnCXb-qokk8TW7Q_"))

Все, что я получаю, это ошибка:

Error: HTTP error [404] Shared drive not found: 1XoNCDizzZMHZ4sbBhnCXb-qokk8TW7Q_
  * domain: global
  * reason: notFound
  * message: Shared drive not found: 1XoNCDizzZMHZ4sbBhnCXb-qokk8TW7Q_
  * locationType: parameter
  * location: driveId

Я получаю те же результаты, используя URL-адрес или идентификатор ресурса.Я попробовал все в документах здесь: https://googledrive.tidyverse.org/ https://cran.r -project.org / web / packages / googledrive / googledrive.pdf

Как мне указать путьв подкаталог внутри моего командного диска?

Answer 1

Оказывается, все очень просто.

Найдите идентификатор папки, в которую вы хотите написать.Проще всего перейти к нему в браузере.Идентификатор находится в URL-адресе.

Например, в этом URL-адресе 1v4SQb39RTE0MCzrZlLXzxVDB4HPZ8NK7: https://drive.google.com/drive/u/0/folders/1v4SQb39RTE0MCzrZlLXzxVDB4HPZ8NK7

Вставьте этот идентификатор в путь / разъем для подключения googsdrive.

drivepath <- drive_get(as_id("1v4SQb39RTE0MCzrZlLXzxVDB4HPZ8NK7"))

Запишите ваш файл в csv, обязательно указав в csv то, что вы хотите, чтобы электронная таблица была помечена (за исключением расширения .csv).(Вы можете сделать это в tempfile , но тогда ваша таблица googles будет заканчиваться именем временного файла.)

write_csv(iris, 'iris_example.csv')

Наконец, поместите файл в нужный каталог.

drive_upload('iris_example.csv', type='spreadsheet', path = drivepath)