This function takes the media_id of a post and text for a comment or the id of a comment to manipulate the comment on the post.

ig_comment(media_id, comment_text, verbose = FALSE)

ig_comment_delete(media_id, comment_id, verbose = FALSE)

Arguments

media_id

numeric; the unique id to identify a post which can be found in the id, not the pk field, of posts returned via many of the functions retrieving feeds.

comment_text

character; the text that would be posted as a comment underneath the post

verbose

logical; do you want informative messages?

comment_id

numeric; the unique id to identify a post which can be found in the "id" on other comments returned via the Instagram API

Examples

last_post_media_id <- ig_my_timeline(paginate = FALSE)$id[1]
#> The rank_token is NULL in Rinstapkg's internal .state environment. This can occur if the user is authorized using OAuth 2.0, which doesn't require a rank_token, or the user is not yet performed any authorization routine. #> When/if needed, 'Rinstapkg' will initiate authentication and authorization. #> Or run ig_auth() to trigger this explicitly.
#> Error: Status: fail #> Message: login_required
comment_result <- ig_comment(last_post_media_id, comment_text = "New Comment!")
#> Error in sprintf("media/%s/comment/", media_id): object 'last_post_media_id' not found
comment_media_id <- comment_result$comment$media_id
#> Error in eval(expr, envir, enclos): object 'comment_result' not found
deletion_result <- ig_comment_delete(last_post_media_id, comment_media_id)
#> Error in sprintf("media/%s/comment/%s/delete/", media_id, comment_id): object 'last_post_media_id' not found