> rm(list=ls())
> library(foreign)
> data.spss
> head(data.spss)
manufact model sales resale type price engine_s horsepow wheelbas
1 Acura Integra 16.919 16.360 Automobile 21.50 1.8 140 101.2
2 Acura TL 39.384 19.875 Automobile 28.40 3.2 225 108.1
3 Acura CL 14.114 18.225 Automobile NA 3.2 225 106.9
4 A