library(readxl)
district<-read_excel("district.xls")