Initial codebase for R WMATA bus sampling project