foreach i in 0 1 2{
foreach j in 1 2{
foreach p of numlist 1/2{
local c 食管 胃
local sex both male female
local doi incidence mortality
local C: word `p' of `c'
local SEX: word `i' of `sex'
local DOI: word `j' of `doi'
preserve
keep if sex==`i' & doi==`j' & site=="`C'"
quietly:su freq
local numerator=r(sum)
quietly:su popu
local denominator=r(sum)
di as text "crude `DOI' rate of `C' in `SEX'=" as result `numerator'/`denominator'*100000 as text "/10万"
restore
}
}
}