R/getPlaylist.R

In tiagomendesdantas/Rspotify: Access to Spotify API via R

#'Get the playlists of a specific user
#'
#'
#'function to get Info about the playlist of a specific user using a username
#'@param name username
#'@param offset The index of the first playlist to return. Default: 0 (the first object). Maximum offset: 100.000.
#'@param token An OAuth token created with \code{spotifyOAuth}.
#'@return get playlist from a specific user using a username
#'@export



#function to get playlists from a user
getPlaylist<-function(name,offset=0,token){
  req<-httr::GET(paste0("https://api.spotify.com/v1/users/",name,"/playlists?limit=50&offset=",offset),httr::config(token = token))
  json1<-httr::content(req)
  json2<-jsonlite::fromJSON(jsonlite::toJSON(json1))$items
  id<-unlist(json2$id)
  name<-unlist(json2$name)
  ownerid<-unlist(json2$owner$id)
  tracks<-unlist(json2$tracks$total)
  dados<-data.frame(id,name,ownerid,tracks,stringsAsFactors = F)
  return(dados)
}