RGA (CRAN) - "get_accounts"提供错误的帐户

Question

Note it says: RGA package from CRAN. Which is different from "rga" package from Github. Nevertheless, i have the same problem with both packages. But for the question let's stick just to RGA from CRAN.

**问题已更新和编辑，因为急救还不够。我仍然有帐户的问题。

我使用 2 封电子邮件来访问 Google Analtics。每个人都可以访问 Google Analytics 中的不同帐户。我在家里使用电子邮件 A，在工作时使用电子邮件 B。

现在，我在 R 中使用 RGA(来自 CRAN)，在我家我需要从电子邮件 B(工作电子邮件，可以访问特定的 Google Analytics 帐户)访问 Google Analytics 帐户。

问题是使用此代码时:

对于帐户 1:电子邮件 A(家庭电子邮件):

client.id1 <- "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"

client.secret1 <- "bbbbbbbbbbbbbb"


ga_token1 <- authorize(client.id1, client.secret1, cache = TRUE, verbose =    getOption("rga.verbose", FALSE))

get_accounts(start.index = NULL, max.results = NULL, ga_token1, verbose = getOption("rga.verbose", FALSE))

对于帐户 2:电子邮件 B(工作电子邮件):

client.id2 <- "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"

client.secret2 <- "yyyyyyyyyyyyyyy"


ga_token2 <- authorize(client.id2, client.secret2, cache = TRUE, verbose =   getOption("rga.verbose", FALSE))


get_accounts(start.index = NULL, max.results = NULL, ga_token2, verbose =    getOption("rga.verbose", FALSE))

不管怎样，我在我的家庭计算机上使用，我从我的家庭 Gmail 帐户(用于 GA)和我的工作 Gmail 帐户(用于 GA)获得相同的帐户。

有没有我遗漏的步骤？

我想获得电子邮件 B 的帐户，但无论如何我只获得与电子邮件 A 相关的帐户。

我已经延迟了我所有的 Google Analytics API 项目(来自 A 和 B)，并重新创建了电子邮件 B 的 API。但无论如何，我只获得了电子邮件 A 的帐户。

**我的 Google Api 项目是使用 B 创建的(可以访问所需帐户的电子邮件)。但我只看到与 A 相关的帐户。

Answer 1

您需要创建两个不同的 token ，它们将授权您通过 Google 登录页面验证的电子邮件。通过自述文件 (?rga.open) 中描述的方法获取数据也容易得多，但对于您的示例:

##authenticate with first email
ga_token1 <- authorize(client.id, client.secret, cache = TRUE, verbose = getOption("rga.verbose", FALSE))
##authenticate with second email
ga_token2 <- authorize(client.id, client.secret, cache = TRUE, verbose = getOption("rga.verbose", FALSE))

然后获取帐户:

get_accounts(start.index = NULL, max.results = NULL, ga_token1, verbose = getOption("rga.verbose", FALSE))
get_accounts(start.index = NULL, max.results = NULL, ga_token2, verbose = getOption("rga.verbose", FALSE))

但我会这样做:

## authenticate under first email
rga.open(instance = "ga1")
## authenticate under second email
rga.open(instance = "ga2")

然后调用配置文件等数据:

profiles1 <- ga1$getProfiles()
profiles2 <- ga2$getProfiles()