# NOT RUN {
my_oauth <- spotifyOAuth(app_id="xxxx",client_id="yyyy",client_secret="zzzz")
save(my_oauth, file="my_oauth")
load("my_oauth")
foofighters <- searchArtist("Foo+fighters",token=my_oauth)
# }
Run the code above in your browser using DataLab