https://drive.google.com/file/d/1-d6WCLWOTrqc-Coyeayg1af1XOm__mZ7/view?usp=sharing Hi I have got data set which consists of tap on and tap off myki data ( it’s card used in Melbourne for public...

---
title: "Untitled"
author: "Unknown"
date: "16 August 2019"
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
# Required libraries:
```{r}
library(data.table)
library(ggplot2)
```
# Set the working directory where the analysis files are located and then read the files to analyse different weeks data.
```{r}
samp = 0
on_folder = sub("x",samp,"2018on")
off_folder = sub("x",samp,"2018off")
on_files = list.files(on_folder,recursive =...