如何在 R 中添加具有评估名称的环境选项?
How do you add an environment option with an evaluated name in R?
我创建了一个 google 令牌(类 Token2.0 的 R6 对象,令牌)以便我可以与 YouTube 分析 API 进行如下交互:
google_token <- httr::oauth2.0_token(httr::oauth_endpoints("google"),
httr::oauth_app("google", appId, appSecret),
scope = c("https://www.googleapis.com/auth/yt-analytics.readonly"))
我还有一个变量Account <- "myChannel"
。类似于我之前发布的问题 我想评估 Account
并将值分配给 google_token
的内容。比如options(myChannel, google_token)
有效,运行getOption("myChannel")
显示token,但是因为我会生成各种token,想创建各种选项,所以想用Account
。我希望类似以下的作品:
options(eval(Account) = google_token
# OR
do.call(options, as.list(setNames(google_token, Account)
这两个都不行。有什么建议吗?
我能够通过将选项值分配给一个列表来解决这个问题,将列表命名为我希望它在选项中的任何名称,然后分配选项,如下所示:
tokenOption <- list(google_token)
names(tokenOption) <- Account
options(tokenOption)
getOption("myChannel")
> #Gives me the results of my google_token
我创建了一个 google 令牌(类 Token2.0 的 R6 对象,令牌)以便我可以与 YouTube 分析 API 进行如下交互:
google_token <- httr::oauth2.0_token(httr::oauth_endpoints("google"),
httr::oauth_app("google", appId, appSecret),
scope = c("https://www.googleapis.com/auth/yt-analytics.readonly"))
我还有一个变量Account <- "myChannel"
。类似于我之前发布的问题 Account
并将值分配给 google_token
的内容。比如options(myChannel, google_token)
有效,运行getOption("myChannel")
显示token,但是因为我会生成各种token,想创建各种选项,所以想用Account
。我希望类似以下的作品:
options(eval(Account) = google_token
# OR
do.call(options, as.list(setNames(google_token, Account)
这两个都不行。有什么建议吗?
我能够通过将选项值分配给一个列表来解决这个问题,将列表命名为我希望它在选项中的任何名称,然后分配选项,如下所示:
tokenOption <- list(google_token)
names(tokenOption) <- Account
options(tokenOption)
getOption("myChannel")
> #Gives me the results of my google_token