if (FALSE) {
library(googleAnalyticsR)
ga_auth()
# the update to perform
o <- list(permissions = list(local = list("EDIT")))
ga_users_update("UA-123456-1:1111222233334444",
update_object = o,
accountId = 47480439,
webPropertyId = "UA-123456-1")
}
Run the code above in your browser using DataLab