Chapter 14 Reordering columns

df <- df[ , c( "age", "test", "weight", "bp", "patient", "rating")]
names(df)

## [1] "age"     "test"    "weight"  "bp"      "patient" "rating"