Reading exported monthly xlsx files. List of .csv.xlsx files would exist in /data folder, named in the form January.csv.xlsx, February.csv.xlsx, etc.

read-xlsx.R

## Including the required R packages.
packages <- c('openxlsx')
if (length(setdiff(packages, rownames(installed.packages()))) > 0) {
  install.packages(setdiff(packages, rownames(installed.packages())))  
}
library(openxlsx)

data <- data.frame()

x <- sapply(month.name, function(month) {
  data <<- rbind(data, read.xlsx(paste0('data/', month, '.csv.xlsx')))
})

data <- data[!is.na(data$Status),]
data$Fee <- as.numeric(data$Fee)