crime=read.table("citycrime.dat",sep="")#lire le fichier
citycrime=as.matrix(data.frame(crime))#passer en format matrice