R/age_duration.R

In screadore/Data-Visualization-Using-R-On-patient-IQ:

#Defining the age and duration of the patient in a coma.
age.duration<-function(age){
  + duration<-ggplot(IQ, aes(x="age", y="duration")) + geom_point() + geom_jitter() + geom_smooth(method = 'lm')
  + return(duration)
}