please see the file uploaded

---
title: "Assignment1_submission"
output: word_document
---
```{r}
## installing required packages
#install.packages("readr")
#install.packages("stringr")
#install.packages("dplyr")
#install.packages("tidyr")
#install.packages("ggplot")
#install.packages("lubridate")
#install.packages("fitdistrplus")
## calling packages
library(readr)
library(dplyr)
library(stringr)
library(tidyr)
library(lubridate)
library(ggplot2)
library(fitdistrplus)
```
## Task1
```{r}
## Reading data into R
Ed_demand<-read.csv("govhack3 .csv",header = TRUE, sep = ',',skip=1)
## dimension of the data
dim(Ed_demand)
## finding the number of columns
length(Ed_demand[1,])
## showing the data types of each variable
str(Ed_demand)
##changing the data type
Ed_demand$Date<-as.Date(Ed_demand$Date,format = "%d-%b-%Y")
## showing the minimum date
min(Ed_demand$Date)
##showing the amximum...