x<-matrix(1:500,100,5)

 save(x,file="c:/temp/xData")
 rm(x)
 load("c:/temp/xDatac")