Infect<- read. CSV (".//mime. CSV ", the header=TRUE)
A<-t (infect $days)
B<-t (infect $mulhave)
Plot (a, b, type="o", ylim=c (0, maxb))

As shown in figure, the X axis is not complete, draw a line diagram is not...