R googledrive googledrive-configuration 穀歌驅動器配置

googledrive 行為的某些方麵可以通過選項進行控製。

用法

local_drive_quiet(env = parent.frame())

with_drive_quiet(code)

參數

env: 用於確定範圍的環境
code: 安靜執行的代碼

授權

了解 googledrive 的主要身份驗證函數 drive_auth() 。它由 gargle 包提供支持，該包會參考以下幾個選項：

默認 Google 用戶，或更準確地說，email：請參閱gargle::gargle_oauth_email()
是否或在何處緩存 OAuth 令牌：請參閱gargle::gargle_oauth_cache()
是否優先選擇"out-of-band" auth：參見gargle::gargle_oob_default()
應用程序默認憑據：請參閱gargle::credentials_app_default()

留言

googledrive_quiet 選項可用於抑製來自 googledrive 的消息。默認情況下，googledrive 總是發送消息，即它並不安靜。

將 googledrive_quiet 設置為 TRUE 以通過以下方式之一按範圍遞減的順序抑製消息：

將 options(googledrive_quiet = TRUE) 放入 start-up 文件中，例如 .Rprofile ，或放在 R 腳本的頂部

使用 local_drive_quiet() 在特定範圍內使 googledrive 靜音

foo <- function() {
  ...
  local_drive_quiet()
  drive_this(...)
  drive_that(...)
  ...
}

使用with_drive_quiet()靜默運行一小段代碼
```
with_drive_quiet(
  drive_something(...)
)
```

local_drive_quiet() 和 with_drive_quiet() 遵循 withr 包 ( https://withr.r-lib.org ) 的約定。

例子

# message: "Created Drive file"
(x <- drive_create("drive-quiet-demo", type = "document"))
#> Created Drive file:
#> • drive-quiet-demo <id: 1-TiT_GLFwC8AVv7RSVMMZYlaSEDRHFfcJJO06ZtBms4>
#> With MIME type:
#> • application/vnd.google-apps.document
#> # A dribble: 1 × 3
#>   name             id       drive_resource   
#>   <chr>            <drv_id> <list>           
#> 1 drive-quiet-demo 1-TiT_G… <named list [35]>

# message: "File updated"
x <- drive_update(x, starred = TRUE)
#> File updated:
#> • drive-quiet-demo <id: 1-TiT_GLFwC8AVv7RSVMMZYlaSEDRHFfcJJO06ZtBms4>
drive_reveal(x, "starred")
#> # A dribble: 1 × 4
#>   name             starred id       drive_resource   
#>   <chr>            <lgl>   <drv_id> <list>           
#> 1 drive-quiet-demo TRUE    1-TiT_G… <named list [36]>

# suppress messages for a small amount of code
with_drive_quiet(
  x <- drive_update(x, name = "drive-quiet-works")
)
x$name
#> [1] "drive-quiet-works"

# message: "File updated"
x <- drive_update(x, media = drive_example_local("chicken.txt"))
#> File updated:
#> • drive-quiet-works <id: 1-TiT_GLFwC8AVv7RSVMMZYlaSEDRHFfcJJO06ZtBms4>

# suppress messages within a specific scope, e.g. function
unstar <- function(y) {
  local_drive_quiet()
  drive_update(y, starred = FALSE)
}
x <- unstar(x)
drive_reveal(x, "starred")
#> # A dribble: 1 × 4
#>   name              starred id       drive_resource   
#>   <chr>             <lgl>   <drv_id> <list>           
#> 1 drive-quiet-works FALSE   1-TiT_G… <named list [36]>

# Clean up
drive_rm(x)
#> File deleted:
#> • drive-quiet-works <id: 1-TiT_GLFwC8AVv7RSVMMZYlaSEDRHFfcJJO06ZtBms4>

源代碼：R/googledrive-package.R、R/utils-ui.R

相關用法

注：本文由純淨天空篩選整理自Jennifer Bryan等大神的英文原創作品 googledrive configuration。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。