## Not run:
# library(pushoverr)
#
# # Create a PushoverMessage
# m2 <- PushoverMessage(message='Hi there',
# token='KzGDORePK8gMaC0QOYAMyEEuzJnyUi',
# user='KAWXTswy4cekx6vZbHBKbCKk1c1fdf')
#
# # If the app token and user key have already been set, messages can be
# # created with just the message argument
# set_pushover_user('KAWXTswy4cekx6vZbHBKbCKk1c1fdf')
# set_pushover_app('KzGDORePK8gMaC0QOYAMyEEuzJnyUi')
# m3 <- PushoverMessage(message='so much less work!')
# ## End(Not run)
Run the code above in your browser using DataLab