infile<-'http://datayyy.com/data_R/builtInRData.RData'
load(url(infile))
dim(.x)
head(.x)
tail(.x)