webuse nhanes2, clear
gen test=0
ds
local varlist `r(varlist)'
display "`varlist'"
foreach var of local varlist {
sum `var', meanonly
if r(mean)==0 {
drop `var'
}
}
webuse nhanes2, clear
gen test=0
ds
local varlist `r(varlist)'
display "`varlist'"
foreach var of local varlist {
sum `var', meanonly
if r(mean)==0 {
drop `var'
}
}