# NOT RUN {
status.me <- getStatus()
status.friends <- getStatus(users_ids = getFriends()$items)
status.groups <- getStatus(groups_ids = getGroups()$items)
status.friends_and_groups <- getStatus(users_ids = getFriends()$items,
groups_ids = getGroups()$items, progress_bar = T)
# }
Run the code above in your browser using DataLab