cap log close
clear
log using StataLog, replace 

do "http://192.38.117.59/~linearpredictors/datafiles/readFever.do"

/*
calculating smoothed values, but supressing the graph,
since we want to customize the y-axis.
*/
  
lowess death alco, adjust bwidth(0.75) nograph generate(smoothed)

/*
We omit the points where death=1.
*/
twoway (scatter death alco) (scatter smoothed alco) if death<1,/*
*/ yscale(range(0 0.03))