#' List all users available to query
#'
#' Depends on having the SPOTIFYAPIDIR environment variable set.
#'
#' @return user_list A list of all users. Can reference to pull token information.
#' @export
#' @examples
#' list_users()
list_users <- function(){
folder <- Sys.getenv('SPOTIFYAPIDIR')
user_files <- dir(folder)
out <- gsub('.json','',user_files)
return(out)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.