I've tried to publish a post in several groups of Facebook
#######################################
### Publicar en vários grupos do FB ###
#######################################
library(Rfacebook)
rm(list = ls())
# Replace <access_token> with your access token
fb_oauth <- fbOAuth(app_id = "my.mail@gmail.com", app_secret = "MyFacebookPassword", extended_permissions = "publish_to_groups",
redirect_url = "http://localhost:1410/", access_token = "<access_token>")
# Get a list of groups that you belong to
my_groups <- getGroup(token = fb_oauth)
# Replace <message> with your text message
post_message <- list(message = "<message>")
for (i in 1:length(my_groups$id)) {
postGroup(group_id = my_groups$id[i], post_message, token = fb_oauth)
}
And I got this error.
Error in fbOAuth(app_id = "my.mail@gmail.com", app_secret = "MyFacebookPasword", :
unused arguments (redirect_url = "http://localhost:1410/", access_token = "<access_token>")
Can you help me to solve it?