Comment changer les comptes Google en utilisant la bibliothèque (googlesheets)?

Question

Je rencontre des problèmes. J'utilise un R-Script sur une machine avec succès. Le même script utilisé sur un ordinateur provoque différents problèmes:

# Here I register the sheet 

browser <- gs_title("Funnel Daily")

browser<-gs_edit_cells(ws="Classic Browser", browser, input = ClassicBrowser, anchor = "A1",byrow = FALSE, col_names = NULL, trim = F,verbose = TRUE)

Auto-refreshing stale OAuth token. 
Error in gs_lookup(., "sheet_title", verbose) : 
"Funnel Daily" doesn't match sheet_title of any sheet returned by gs_ls() (which  should reflect user's Google Sheets home screen). 
    > browser <- gs_title("Funnel Daily") 
Error in gs_lookup(., "sheet_title", verbose) : 
    "Funnel Daily" doesn't match sheet_title of any sheet returned by gs_ls() (which should reflect user's Google Sheets home screen).` 

si vous utilisez gl_ls() je reçois un message sur un compte Google que j'utilise aussi fréquemment. Donc, y a-t-il un moyen, peut-être, via un jeton de différencier les comptes ou comment puis-je résoudre ce problème? Je veux dire comment puis-je forcer googlesheets à accéder à un compte spécifique? Actuellement j'utilise le token du compte qui correspond à Funnel Daily. La seule possibilité que je puisse penser qui peut avoir causé le problème est que l'authentification du navigateur a été faite avec le compte qui n'a pas inclus Funnel Daily .. Je les ai juste confondus. J'ai essayé d'enlever googlesheets ainsi que httr avec toutes les dépendances. Mais lors de l'exécution duet en demandant gs_user googlesheets se réfère toujours au compte qui ne comprend pas la feuille spécifique.

Answer 1

Inclure vos informations d'identification et confirmez la browser authentication via votre compte Google Entonnoir Daily:

options(googlesheets.client_id = "", 
    googlesheets.client_secret = "", 
    googlesheets.httr_oauth_cache = FALSE) 

gs_auth(token = NULL, new_user = FALSE, 
    key = getOption("googlesheets.client_id"), 
    secret = getOption("googlesheets.client_secret"), 
    cache = getOption("googlesheets.httr_oauth_cache"), verbose = TRUE) 

Vive