R code to scrape data from the Basis One watch.