#Data Frame

height <-c(50, 30, 40, 65, 60)
weight <-c(95, 40, 60, 160, 125)
age <-c(12, 6, 7, 16, 13)
name <-c("Tim", "Tom", "Jeff", "Gretchen", "Tab")
data <-data.frame(name, age, weight, height)