chp3 smoking example needs work. The analysis is wrong as I susptect the data may be wrong