Chapter 13 reorder the variable names

df <- df[ , c(6:1)]
names(df)
## [1] "test"    "rating"  "bp"      "weight"  "age"     "patient"
colnames(df)
## [1] "test"    "rating"  "bp"      "weight"  "age"     "patient"