NHANES数据库,CVD判断

# MCQ160b - Ever told had congestive heart failure
# MCQ160c - Ever told you had coronary heart disease
# MCQ160d - Ever told you had angina/angina pectoris
# MCQ160e - Ever told you had heart attack
# MCQ160f - Ever told you had a stroke

history_df <- history_df %>% 
  mutate(CVD=case_when(
   MCQ160B == 1 | MCQ160C == 1 | MCQ160D == 1 | MCQ160E == 1 | MCQ160F == 1 ~ "CHD",
   MCQ160B == 2 | MCQ160C == 2 | MCQ160D == 2 | MCQ160E == 2 | MCQ160F == 2  ~ "CHD_no"
)
)
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值