ggplot(data = ans1,aes(Month,NumOfComplaints,label = NumOfComplaints))+
geom_line()+
geom_point(size = 0.8)+
geom_text()+
scale_x_continuous(breaks = ans1$Month)+
labs(title = "Monthly Ticket Count",x= "Months",y ="No. of Tickets")+
theme(plot.title = element_text(hjust = 0.5))