如何在R中写出条件项

Question

我有身高、体重、性别和年龄的数据。

我想要创建一个列，它的BMI状态表明(1)超重，(0)健康体重(在这个数据集中没有儿童体重不足)。

然而，这需要以年龄为基础。

我有两类年龄：

• 8，9，10 11，=儿童~ 0
• 12，13，14，15 =青少年1

BMI状况类别必须是：

• 年龄(0)：体重指数为21或更高的超重状况，体重指数低于21
• 的健康体重状况(1)：体重指数为23或更高的超重状况，体重指数低于23

的健康体重状况

bmi_child <- data %>%
  select(famid, age, sex, ethnicity, height1_child, weight2_child)

 
bmi_child$BMI <- (bmi_child$weight2_child *703)/(bmi_child$height1_child)^2

bmi_child <- bmi_child %>%
  mutate(age_category = case_when(
    age %in% c("7", "8", "9", "10", "11" ) ~ 0,
    age %in% c("12", "13", "14", "15") ~ 1)
    )

bmi_child <- bmi_child %>%
  mutate(BMI_status = case_when(
     BMI > 21 ~ 1,
     BMI < 21 ~ 0))

我一直在处理If语句，但无法获得可行的代码将bmi状态列作为age_category的一个条件。

谢谢!

Answer 1

就像这样：

bmi_child <- bmi_child %>% 
               mutate(
                 age_category = age > 11,
                 bmi_status   = if_else(age_category, BMI >= 23, BMI >= 21)
               )