tkn <- imgur_login()
# comment on an image
cmt <- create_comment("vSXfU46", "This is a test comment", token = tkn)
# create a reply comment
create_comment("vSXfU46", "This is a test comment", parent = cmt, token = tkn)
Run the code above in your browser using DataLab