Get Media Comments and Likers

These functions return the comments and user like data from a single post.

ig_get_media_comments(media_id, max_id = NULL, return_df = TRUE,
  paginate = TRUE, max_pages = 10, verbose = FALSE)

ig_get_media_likers(media_id, max_id = NULL, return_df = TRUE,
  paginate = TRUE, max_pages = 10, 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.
max_id	integer; the unique id identifying the oldest post that you would want to retrieve in this function call
return_df	logical; do you want to return the results as a tbl_df with one row per entity or as a list with one element per entity?
paginate	logical; do you want to paginate through results or just return the first page?
max_pages	integer; a limit to the number of pages to retrieve from paginated endpoints. Instagram feeds have the potential to paginate forever, so by default we stop after pulling 10 pages. If you would like more or less pages returned, then modify this argument.
verbose	logical; do you want informative messages?

Examples

bieber_user_id <- ig_get_user_id("justinbieber")
#> Error: Status: fail
#> Message: login_required
bieber_feed <- ig_get_user_feed(bieber_user_id, paginate = FALSE)
#> Error in check_user_id(user_id): object 'bieber_user_id' not found
most_recent_post_comments <- ig_get_media_comments(media_id = bieber_feed$id[1])
#> Error in sprintf("media/%s/comments/", media_id): object 'bieber_feed' not found
most_recent_post_likers <- ig_get_media_likers(media_id = bieber_feed$id[1])
#> Error in sprintf("media/%s/likers/", media_id): object 'bieber_feed' not found