Creates data sets about wearable technology using R.