避免在ROAuth握手的PIN一步，如果我是唯一的用户？(Avoid The PIN step in

问 ：有没有一种方法，以避免做一个OAuth握手时，手动输入PIN？

背景 ：当进行ROAuth握手，我被要求输入PIN码，我通过以下链接获得：

rm(list=ls())
library("twitteR")
library("ROAuth")

Credentials <- OAuthFactory$new(
  consumerKey = "...",
  consumerSecret = "...",
  oauthKey = "...",
  oauthSecret = "...",
  requestURL = "https://api.twitter.com/oauth/request_token",
  authURL = "https://api.twitter.com/oauth/authorize",
  accessURL = "https://api.twitter.com/oauth/access_token")

Credentials$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))

其输出：

凭据$握手（cainfo =执行。系统（ “CurlSSL”， “cacert.pem”，包= “RCurl”））要启用连接，请直接将您的Web浏览器： https://api.twitter.com/oauth /授权的oauth_token =？ ...完成后，记录提供给您的PIN码，并在此处提供：

我输入PIN码。

我想避免这一步，因为每次我在一个新的R会议上，我必须手动打开浏览器来获取PIN运行该脚本。 我使用这个脚本的唯一的人。

Answer 1:

在执行握手，你可以将对象保存到一个文件...

save(Credentials, file="credentials.RData")

在以后的日子，你可以使用load（）来拉在文件中，并使用原始凭证的对象。

文章来源: Avoid The PIN step in ROAuth handshake if I'm the only user?