* do-file for Supplementary exercise 9.20 of IPS7e
version 17 /* works also with versions 13-16 */

import delimited "R:\Chapter 9\ex09_020.csv"
rename survivors patients
tabulate status ownership [fweight=patients ], cchi2 chi2 column exact expected row