multiple plots of time series in one graph in R

Question

i have data like this

  var1<- rnorm(100, 5, 10)
  var2<- rnorm(100, 300, 45)
  country <- rep(c("a","b","c","d",