Unir vectores a DataFrame
data<- data.frame(Age, ExactObs, NotYetSmoke, SmokedErlier)
Diana H
data<- data.frame(Age, ExactObs, NotYetSmoke, SmokedErlier)