Introduce cars data set

cars = read.csv("cars.txt", header=TRUE, sep = ',')

Convert time.to.60 seconds to time.to.60 minutes in new columns

cars$time.to.60.min <- cars$time.to.60/60

Delete columns hp, mpg, year, brand

cars$mpg <- NULL
cars$hp <- NULL
cars$year <- NULL
cars$brand <- NULL

Min-Max transformation for cars$weightlbs

cars$weightlbsminmax = (cars$weightlbs - min(cars$weightlbs))/(max(cars$weightlbs) - min(cars$weightlbs))
head(cars, n=10)
##    cylinders cubicinches weightlbs time.to.60 time.to.60.min weightlbsminmax
## 1          8         350      4209         12      0.2000000      0.76713948
## 2          4          89      1925         14      0.2333333      0.09219858
## 3          8         302      3449         11      0.1833333      0.54255319
## 4          8         400      3761         10      0.1666667      0.63475177
## 5          4          98      2051         17      0.2833333      0.12943262
## 6          8         350      3900         17      0.2833333      0.67582742
## 7          8         351      4363         13      0.2166667      0.81264775
## 8          8         440      4312          9      0.1500000      0.79757683
## 9          5         183      3530         20      0.3333333      0.56648936
## 10         4          89      2050         17      0.2833333      0.12913712