## Not run:
# available_devs <- get_devices(token='KzGDORePK8gMaC0QOYAMyEEuzJnyUi',
# user='uQiRzpo4DXghDmr9QzzfQu27cmVRsG')
# ## End(Not run)
## Not run:
# is.device(device='phone',
# token='KzGDORePK8gMaC0QOYAMyEEuzJnyUi',
# user='uQiRzpo4DXghDmr9QzzfQu27cmVRsG')
# ## End(Not run)
Run the code above in your browser using DataLab