18) R Экспорт данных

Затем вы будете перенаправлены на Google API, чтобы разрешить доступ. Нажмите Разрешить.

После завершения аутентификации вы можете выйти из браузера.

В консоли Rstudio вы можете увидеть итоги выполненного шага. Google успешно загрузил файл, расположенный локально на диске. Google присвоил идентификатор каждому файлу на диске.

Вы можете увидеть этот файл в Google Spreadsheet.

drive_browse("table_car")

Вывод:

Вы будете перенаправлены на электронную таблицу Google.

Импорт с Google Диска

Загрузить файл с Google Drive с идентификатором удобно. Если вы знаете имя файла, вы можете получить его идентификатор следующим образом:

Примечание : в зависимости от вашего интернет-соединения и размера вашего диска, это может занять некоторое время.

x <-drive_get("table_car")
as_id(x)

Вы сохранили идентификатор в переменной x. Функция drive_download () позволяет загружать файл с Google Drive.

Основной синтаксис:

drive_download(file, path = NULL, overwrite = FALSE)
arguments:
- file:  Name or id of the file to download
-path: Location to download the file. By default, it is downloaded to the working directory and the name as in Google Drive
-overwrite = FALSE: If the file already exists, don't overwrite it. If set to TRUE, the old file is erased and replaced by the new one.

Вы можете наконец загрузить файл:

download_google & lt; - drive_download(as_id(x), overwrite = TRUE)

Код Объяснение

• drive_download (): функция для загрузки файла с Google Drive
• as_id (x): используйте идентификатор для просмотра файла на Google Диске
• overwrite = TRUE: если файл существует, перезаписать его, иначе выполнение остановлено. Для локального просмотра имени файла вы можете использовать:

Вывод:

Файл хранится в вашем рабочем каталоге. Помните, вам нужно добавить расширение файла, чтобы открыть его в R. Вы можете создать полное имя с помощью функции paste () (то есть table_car.csv)

google_file <-download_google$local_path
google_file
path <-paste(google_file, ".csv", sep = "")
google_table_car <-read.csv(path)
google_table_car

Вывод:

##   X gear mean_mpg mean_disp
## 1 1    3 16.10667  326.3000
## 2 2    4 24.53333  123.0167
## 3 3    5 21.38000  202.4800

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

## remove file
drive_find("table_car") %>%drive_rm()

Вывод:

Это медленный процесс. Занимает время для удаления

Экспорт в Dropbox

install.packages('rdrop2')

library(rdrop2)

drop_auth()

Вы получите страницу подтверждения. Вы можете закрыть его и вернуться к R

Вы можете создать папку с помощью функции drop_create ().

• drop_create (‘my_first_drop’): создать папку в первой ветви Dropbox
• drop_create (‘First_branch / my_first_drop’): создать папку в существующей папке First_branch.

drop_create('my_first_drop')

Вывод:

В DropBox

Чтобы загрузить файл .csv в свой Dropbox, используйте функцию drop_upload ().

Основной синтаксис:

drop_upload(file, path = NULL, mode = "overwrite")
arguments:
- file: local path
- path: Path on Dropbox 
- mode = "overwrite":  By default, overwrite an existing file. If set to `add`, the upload is not completed.

drop_upload('table_car.csv', path = "my_first_drop")

Вывод:

На DropBox

Вы можете прочитать CSV-файл из Dropbox с помощью функции drop_read_csv ()

dropbox_table_car <-drop_read_csv("my_first_drop/table_car.csv")
dropbox_table_car

Вывод:

##   X gear mean_mpg mean_disp
## 1 1    3 16.10667  326.3000
## 2 2    4 24.53333  123.0167
## 3 3    5 21.38000  202.4800

Когда вы закончили использовать файл и хотите удалить его. Вам нужно записать путь к файлу в функции drop_delete ()

drop_delete('my_first_drop/table_car.csv')

Вывод:

Также можно удалить папку

drop_delete('my_first_drop')

Вывод:

Резюме

Мы можем суммировать все функции в таблице ниже